Напишите функцию, которая позволяет вычислить корень любой натуральной степени. Само число и степень корня – параметры функции.
Пожалуйста, очень надо!
Ответы
Ответ дал:
0
{ ВНИМАНИЕ: Требует "uses Math;" и
FreePascal / Pascal ABC для Power() }
function NthRoot(x: real; y: integer): real;
begin
NthRoot := Power( x, (1 / y) );
end;
begin
writeln(NthRoot(9, 2):0:1);
end.
FreePascal / Pascal ABC для Power() }
function NthRoot(x: real; y: integer): real;
begin
NthRoot := Power( x, (1 / y) );
end;
begin
writeln(NthRoot(9, 2):0:1);
end.
Вас заинтересует
1 год назад
6 лет назад
8 лет назад
8 лет назад