Ответы на вопрос:
циклом долго.
эта проблема уже давно решена. вот готовая отлаженная функция:
function pow(a,b: real): real;
{ функция возведения в степень (a^b) }
var t: real;
begin
t : = abs(a);
if a < 0 then pow : = (-1)*exp(b*ln(t))
else pow : = exp(b*ln(t));
end;
Популярно: Информатика
-
firstoneking108.09.2022 01:48
-
nut5624.10.2020 09:35
-
tihayasonyap0c4ug14.11.2020 15:06
-
anaStasyaplus09.01.2022 12:47
-
godday20.09.2021 17:57
-
Greeegooo28.07.2020 13:39
-
wwwraisakravets29.10.2020 06:19
-
SANMAN2618.08.2021 10:15
-
merlinina7428.10.2022 10:21
-
olga1408125.03.2023 03:01