даны 3 числа определить,что больше сумма или произведение этих чисел

Question

даны 3 числа определить,что больше сумма или произведение этих чисел

Answer 1

Program test;
var a,b,c,sum,pr:integer;
beginreadln(a,b,c);
sum:=a+b+c;
pr:=a*b*c;
if sum>pr then writeln ('сумма больше произведения')
else writeln('произведение больше суммы');
end.