Программа запрашивает целое число и определяет четное или нечетно. Составить блок схему и программу.
Ответы
Ответ дал:
0
var a:integer;
begin
readln (a);
if (a mod 2 = 0) then writeln ('Четно') else writeln ('Нечетно');
end.
begin
readln (a);
if (a mod 2 = 0) then writeln ('Четно') else writeln ('Нечетно');
end.
Приложения:

Похожие вопросы
2 года назад
2 года назад
7 лет назад
10 лет назад