Есть 4 числа a b c d. Число a умножается на число b а число с умножается на число d. Вывести на экран большее поизведение

Question

Информатика

Сева

9 июня, 07:57

Есть 4 числа a b c d. Число a умножается на число b а число с умножается на число d. Вывести на экран большее поизведение

+2

Ответы (1)

Знаете ответ?

Изот · Answer 1

Var

a, b, c, d, p1, p2: integer;

begin

readln (a, b, c, d) ;

p1 : = a * b;

p2 : = c * d;

if p1 > p2 then writeln (p1)

else writeln (p2) ;

end.