Даны 3 действительных числа найдите наибольшее значене из их суммы и произведения. Составить алгоритм и программу. В паскале

Question

Информатика

Серафим

27 ноября, 16:42

Даны 3 действительных числа найдите наибольшее значене из их суммы и произведения. Составить алгоритм и программу. В паскале

+2

Ответы (1)

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

Андрон · Answer 1

Var a, b, c, s, p:longint;

begin

p:=0;

s:=0;

writeln ('Введите через пробел три числа');

read (a, b, c);

s:=a+b+c;

p:=a*b*c;

if s>p then writeln ('Сумма больше произведения')

else if s

else writeln ('Сумма и произведение равны');

end.