• Паскаль. Составить программу введённого пользователем числа(целое или нет; положительное, отрицательное или нуль; чётное или нечётное)

Ответы 1

  • var a: real;beginread(a);if (a mod 2=0) and(a<>0) then write('четное');if (a mod 2=0) and(a<>0) then write('не четное');if a=0 then write('нуль');if a>0 then write('положительное');if a<0 then write('отрицательное');if a=0 then write('нуль');end.

  • Добавить свой ответ

Войти через Google

или

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

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

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