• Оформить рекурсию для вычисления числа в n степени

Ответы 1

  • PascalABC.NET 3.4.2, сборка 1884 от 24.11.2018Внимание! Если программа не работает, обновите версию!

    function Pow(x: real; n: integer): real :=

       (n = 0) and (x <> 0) ? 1.0 :

       (n <> 0) and (x = 0) ? 0.0 :

       n > 0 ? x * Pow(x, n - 1) :

       Pow(x, n + 1) / x;

    begin

     Pow(-0.034, -6).Println

    end.

    Результат647331137.613734
    • Автор:

      boonec6yx
    • 5 лет назад
    • 0
  • Добавить свой ответ

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years