puoi usare anche i logaritmi
function power(B,E : real): real;
begin
power:=exp(E * ln (B))
end;
function readice(a,b : real) : real;
begin
radice := power(a,(1/b));
end;
stai attento però a quando da errore di esecuzione
Radice
Data: 02/04/2010
|
Aggiungi un commento