Дано 2 целых числа a,b из числового промежутка [1,20]. Определить произведение чисел превосходит 200 или нет.

Grotesk1077 Grotesk1077    1   07.04.2021 21:05    2

Ответы
richietozier6 richietozier6  07.05.2021 21:07

var a,b:integer;

begin

readln (a,b);

if a*b>200 then writeln ('Превосходит')

else

  writeln ('Не превосходит');

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика