Регистрация
tsaturyansyuza
09.12.2021 20:21
Информатика
Есть ответ 👍

Укажите верно или неверно

142
219
Посмотреть ответы 1

Ответы на вопрос:

Vlada2005Bee
Vlada2005Bee
4,8(83 оценок)

program zadanie;

var a,b,c: integer;

begin

write('введите два числа: ');

readln(a,b);

c: =abs(a-b);

if c mod 2=0 then wtiteln('число ',с, ' четное')

else writeln('число ',с, ' нечетное');

readln;

end.

Популярно: Информатика