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

Напишите программу, которая считывает, введенное пользователем
целое число, определяет и выводит на экран, является ли оно четным
или нечетным.
C тернарным оператором

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

Var n:integer; s:string;
begin
write(n=); readln(n);
s:=n mod 2 = 0?четное:нечетное;
writeln(s);
end.

Пример:
n=20
четное