Даны три вещественных числа x,y,z. Вычислить значения выражений x+y+z и xyz и вывести...

Question

Даны три вещественных числа x,y,z. Вычислить значения выражений x+y+z и xyz и вывести максимальное из них.

Answer 1

Var x,y,z,sum,pr:real;
begin
readln(x,y,z);
sum:=x+y+z;
pr:=x*y*z;
if (sum>pr) then
writeln(sum)
else
writeln(pr);
end.