profile
Опубликовано 6 лет назад по предмету Информатика от Islom36

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

  1. Ответ
    Ответ дан 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;
Самые новые вопросы