Ответ №1
Var
a, b: integer;
begin
readln(a, b);
if a mod 2 = 1 then
writeln(a, ' нечетное ')
else writeln(b, ' нечетное');
end.
Ответ №1
Var
a, b: integer;
begin
readln(a, b);
if a mod 2 = 1 then
writeln(a, ' нечетное ')
else writeln(b, ' нечетное');
end.
Знаете ответ?