Рекурсивное вычисление корня третьей степени из числа

@jestero · Регистрация: 17.02.2014

Что в данном случае означают параметры функции k и n?

Pascal

program qroot; 
function f(x:real; k,n:integer):real; 
var p:real; 
begin 
if n=0 then f:=1 
else begin p:=f(x,k,n-1); f:=p-(p-x/exp(ln(p)*(k-1)))/k end
end;
var a,x:real; n,k:integer; 
begin 
k:=3; write('x n: '); readln(x,n); a:=f(x,k,n); writeln(a); readln 
end.

@Puporev · 09.06.2016, 17:45

k-степень корня, здесь это и не нужно, k=3.
n-количество итераций, чем больше тем точнее.

@Puporev Почетный модератор 64272 / 47571 / 32739 Регистрация: 18.05.2008 Сообщений: 115,182
	09.06.2016, 17:45	2
	k-степень корня, здесь это и не нужно, k=3. n-количество итераций, чем больше тем точнее. 1

Опции темы