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

var n:integer; s:string;beginwrite('n='); readln(n);s:=n mod 2 = 0?'четное':'нечетное';writeln(s);end.Пример:n=20четное