Написать программу. Задано натуральное число. Определить делится ли оно на два. Примечание: проверка делимости на 2 осуществляется следующим образом: пусть N-натуральное число. Если N/2=N\2,то число делится на 2, иначе нет. (N/2-обычное деление, N\2-деление нацело)
Program evenNum;
Uses crt;
var n:real;
begin
clrscr;
write('Введите число n: ');
readln(n);
if ((n/2)<>(n div 2)) then writeln('Число не делится на 2 нацело' )
else writeln('Число делится на 2 нацело' );
readkey;
end.