Jak zrobić pierwiastek 3 stopnia np. z dowolnej liczby?
nie wiem czy zadowoli cie pascalowy kod, ale na wszelki wypadek podam go ponizej
uses crt;
var a:integer;
randomize;
a:=random(100)
writeln (aaa);
end.
nie wiem czy dokladnie o to ci chodzi ale cos mi to mowila tak wiec SPRoBOWALEM cos pomoc...
{hello} pozdrawiam {hello}
Mily napisał:
nie wiem czy zadowoli cie pascalowy kod, ale na wszelki wypadek podam go ponizej
>
>uses crt;
>var a:integer;
>randomize;
>a:=random(100)
>writeln (aaa);
>end.
>
>nie wiem czy dokladnie o to ci chodzi ale cos mi to mowila tak wiec SPRoBOWALEM cos pomoc...
> {hello} pozdrawiam {hello}
To jest potega a nie pierwiastek!!!--Pawel
Delphi6
ojj... racja.. pomylilo mi sie... :]
spalam sie ze wstydu {wstyd} {wstyd} {wstyd}
{hello} pozdrawiam {hello}
i sorka za pomylke :]
W Delphi zozna uzyc funkcji Power (potega) z modulu Math
uses Math;
function Pierwiastek(Base : Extended; Exponent : Extended):Extended;
begin
Result:=Power(Base,1/Exponent);
end;--Pawel
Delphi6