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

polinapolina971 polinapolina971    2   02.10.2019 19:01    0

Ответы
Vyacheslav009 Vyacheslav009  09.10.2020 12:18
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
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика