Делится ли заданное число на два?

вообще признак делимости на 2 можно определитьпроще. Если остаток от деления на 2=0 тогда число делится на 2 нацелоиначе нет if (n mod 2)=0  then writeln(Число  делится на 2 нацело )else   writeln(Число не  делиться на 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.   

Если ответ по предмету Информатика отсутствует или он оказался неправильным, то попробуй воспользоваться поиском других ответов во всей базе сайта.