Опубликовано 11.06.2017 по предмету Информатика от Гость >> <<

МНОГО БАЛЛОВ. ПАСКАЛЬ. Пользователь вводит с клавиатуры целое число а. Если это число является четным, вывести на экран фразу "Вы ввели четное число", в другом случае "Вы ввели нечетное число"

Ответ оставил Гость

var a:integer; 
begin 
read(a); 
if (a mod 2=0) then writeln(Вы ввели четное число)   
else writeln(Вы ввели нечетное число); 
end.