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

Что озгачает else writeln

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