Ввести два числа, если они оба четные, найти наибольшее из них. pascal

уукуку уукуку    3   12.06.2019 04:00    0

Ответы
regina1002 regina1002  09.07.2020 20:33
Var a,b:integer; 
begin
writeln('Введите два числа');
readln(a,b);if (a mod 2=0) and (b mod 2 =0) then
if a>b then write(a) else write (b)
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика