• Помогите решение pascal
    Дано число если оно чётное вывести YES если не чётное то NO

Ответы 2

  • var x : integer;beginreadln(x);if (x mod 2 = 0) thenwrite('YES')elsewrite('NO');end.
    • Автор:

      casio
    • 6 лет назад
    • 0
  • var n:integer;begin  readln(n);  if n mod 2 = 0 then write('YES')  else write('NO')end.
  • Добавить свой ответ

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years