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

Question

Информатика

Михайлина

8 мая, 10:11

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

+3

Ответы (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.