Ввести двухзначное число и вывести на экран сообщение четное оно или нет?
x mod 2 =0- четное
.......
Напишите пожалуйста!!!!!!
Ответы на вопрос
Ответил Burxon21
0
var x:integer;
begin
Write('x='); Readln(x);
If x mod 2 = 0 then Writeln('четное')
else Writeln('не четное ');
readln;
end.
begin
Write('x='); Readln(x);
If x mod 2 = 0 then Writeln('четное')
else Writeln('не четное ');
readln;
end.
Ответил L8inna
0
Что озгачает else writeln
Новые вопросы