Question

Pascal ABC

Даны действительные числа x,y и z
вычислить max(x+y+z, xyx)

Answer 1

var
  x, y, z: real;
begin
  readln(x, y, z);
  writeln(max(x + y + z, x * y * x));
end.