даны вещественные числа x, y, z. Вычислите следующее выражение:max(x+y+z, xyz) ;
Answers & Comments
alexzn31
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;
Answers & Comments
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;