Вопрос, который вызвал трудности

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

Ответ экспертов Учись.Ru

Чтобы дать полноценный ответ, был привлечён специалист, который хорошо разбирается в теме.

После обсуждения с другими специалистами сервиса мы пришли к выводу, что правильный ответ на ваш вопрос будет звучать следующим образом:

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

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