• даны два целых числа а,в определить являются ли они четными

Ответы 1

  • Паскаль

    program m1;uses crt;var a,b:integer;beginwrite('Введите число a: '); readln (a);write('Введите число b: '); readln (b);if (a mod 2 = 0) then writeln ('Число a четное!')else writeln ('Число a нечетное!');if (b mod 2 = 0) then writeln ('Число b четное!')else writeln ('Число b нечетное!');end.

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

Еще вопросы

Войти через Google

или

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

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

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