Question

с клавиатуры вводятся 3 числа x,y,z.Вычислить значения выражений x+y+z и x*y*z и максимальное из них вывести на экран. в паскале

Answer 1

var x,y,z,a,b: integer;
begin
readln (x);
readln (y);
readln (z);
a:=x+y+z;
b:=x*y*z;
if a>b then writeln (a);
if b>a then writeln (b);
end.

Answer 2

спасибо огромное