Gryno formulė: Skirtumas tarp puslapio versijų

Ištrintas turinys Pridėtas turinys
441 eilutė:
:<math>=\frac{1}{7680}\left(62081317,771613740125811409969418-314,81340978128682257889253144763\right)+\frac{128}{7680}=</math>
:=(62081002,958203958838988831076887+128)/7680=8083,4805935161404738266707131363.
:Panaudojus ''Free Pascal'' kodą:
var
a:longint;
c:real;
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 27 sekundžių su 2,6 GHz procesoriumi.
 
== Taip pat skaitykite ==