Ввести двухзначное число и вывести на экран сообщение четное оно или нет? x mod 2 =0- четное напишите

Question

Информатика: Ввести двухзначное число и вывести на экран сообщение четное оно или нет? x mod 2 =0- четное напишите

danisimokuvshn · Answer

Var x:integer;begin  Write( x= ); Readln(x);  If x mod 2 = 0 then Writeln( четное )else Writeln( не четное  );readln;end....