Даны вещественные числа x, y, z. Вычислите следующее выражение:max (x+y+z, xyz) ;

Function z00006 (x, y, z : real) : real;

var

m1, m2 : real;

begin

{Äàíû âåùåñòâåííûå : èñëà x, y, z. Âû:èñëèòå ñëåäóþùåå

âûðàæåíèå: max (x+y+z, xyz) }

m1 : = x + y + z;

m2 : = x * y * z;

if (m1 > m2) then

begin

z00006 : = m1;

end

else

begin

z00006 : = m2;

end;

end;