Ответы
Ответ дал:
0
var a:integer;
begin
write('A='); readln(a);
if a mod 2 = 0
then writeln('число ',a,' четное')
else writeln('число ',a,' нечетное')
end.
begin
write('A='); readln(a);
if a mod 2 = 0
then writeln('число ',a,' четное')
else writeln('число ',a,' нечетное')
end.
Ответ дал:
0
Что нужно ввести здесь А= ? Паскаль выдает ошибку без ввода.
Ответ дал:
0
нужно ввести какое-нибудь число
Ответ дал:
0
А как блок-схемой это написать?
Похожие вопросы
2 года назад
7 лет назад
7 лет назад
9 лет назад
10 лет назад