Написать программу: Дано целое число. Если оно является нечетным, то прибавить к нему 3; в противном случае вычесть из него 2
Ответы
Ответ дал:
0
var a:integer;
begin
read(a);
if a mod 2 = 0 then a:= a-2
else a:=a+3;
end.
begin
read(a);
if a mod 2 = 0 then a:= a-2
else a:=a+3;
end.
Похожие вопросы
2 года назад
6 лет назад
9 лет назад
9 лет назад