Составьте  программу, которая определяет, является ли введенное целое число нечетным, и выводит на экран соответствующее сообщение:"Да" либо "Нет".

Ответы

Ответ дал: StrangeT
0
var
x:integer;
begin
write('Введите число: ');
readln(x);
if x mod 2=1 then writeln('Да') else writeln('Нет');
end.

Похожие вопросы