Составьте программу на языке Паскаля, определяющую, является ли введенное с клавиатуры целое число четным
Пример ввода:
68
Пример вывода:
Число 68 - четное
Пример ввода:
68
Пример вывода:
Число 68 - четное
More Questions From This User See All
Answers & Comments
text:integer;
Begin
readln(text);
if (text mod 2 = 0) then writeln(text,' - четное')
else writeln(text,' - не четное')
End.
text:integer;
Begin
readln(text);
if (text mod 2 = 0) then writeln(text,' - четное')
else writeln(text,' - не четное');
End.