Gryno formulė: Skirtumas tarp puslapio versijų

Ištrintas turinys Pridėtas turinys
447 eilutė:
begin
for a:=1 to 1000000000 do
c:=c+sqrt(sqr(0.000000005*a-0.000000005*(a-1))+sqr(sqr(0.000000005*a)-sqr(0.000000005*(a-1))))*sqr((0.000000005*a)+sqr(0.000000005*a));
writeln(c);
readln;
end.
:gauname atsakymą m=8083,48061127561 po 2730 sekundžių su 2,6 GHz procesoriumi.
 
== Taip pat skaitykite ==