Gryno formulė: Skirtumas tarp puslapio versijų
Ištrintas turinys Pridėtas turinys
394 eilutė:
readln;
end.
:duoda atsakymą m=84,503119936731021 po 17 sekundžių su 2,6 GHz procesoriumi (vadinasi, 1000000000 dalybos operacijų padaroma per 23-17=6 sekundes su 2,6 GHz procesoriumi
var
a:longint;
c:real;
begin
for a:=1 to 1000000000 do
c:=c+1/a;
writeln(c);
readln;
end.
:gauname atsakymą 21,3004815025070 po 8 sekundžių su 2,6 GHz procesoriumi (beje, <math>\int_1^{10^9} dx=\ln(10^9)-\ln(1)=9ln(10)-0=20.7232658369464</math>)).
== Taip pat skaitykite ==
| |||