число пи это 3.12..................................... до ху зна какой степени)а вообще это соотношение длины окружности круга поделеного на его диаметр
Архимед считал как пи=22/7,
китайцы как пи=355/113
вот совсем маленькая программка:
const
n=10000000;
r=46340;
r2=46340*46340;
var
i,pi : longInt;
x,y : real;
begin
Randomize;
pi:=0;
for i:=1 to n do
begin
x:=Random(r+1);
y:=Random(r+1);
if ( x*x+y*y < r2 ) then Inc(pi);
end;
WriteLn('pi=',(pi/i*4):0:5);
end.
Відповіді
lynkz
1 00:41, 01.12.2012
Программа называется superpi
Используется для тестирования скорости работы процессоров, вычисляет число пи хоть с мульйоном знаков после запятой.
Гість
2 04:13, 01.12.2012
число пи это 3.12..................................... до ху зна какой степени)а вообще это соотношение длины окружности круга поделеного на его диаметр
lynkz
3 00:46, 01.12.2012
Алгоритм известен - делим периметр правильного n-угольника, вписанного в окружность, на диаметр этой окружности. n направляем в бесконечность.
Гість
4 06:38, 01.12.2012
3,14159265358979323846264338327950288419716939937510582097494459230781640628620899862803482534211706798214808651328230664709384460 9550582231725359408128481117450284102701938521105559644622948954930381964428810975665933446128475648233786783165271201909145648566 9234603486104543266482133936072602491412737245870066063155881748815209209628292540917153643678925903600113305305488204665213841469 5194151160943305727036575959195309218611738193261179310511854807446237996274956735188575272489122793818301194912983367336244065664 3086021394946395224737190702179860943702770539217176293176752384674818467669405132000568127145263560827785771342757789609173637178 7214684409012249534301465495853710507922796892589235420199561121290219608640344181598136297747713099605187072113499999983729780499 51059
Мочалкин Блюз
5 15:12, 01.12.2012
Архимед считал как пи=22/7,
китайцы как пи=355/113
вот совсем маленькая программка:
const
n=10000000;
r=46340;
r2=46340*46340;
var
i,pi : longInt;
x,y : real;
begin
Randomize;
pi:=0;
for i:=1 to n do
begin
x:=Random(r+1);
y:=Random(r+1);
if ( x*x+y*y < r2 ) then Inc(pi);
end;
WriteLn('pi=',(pi/i*4):0:5);
end.
Східняк
6 19:45, 04.12.2012
Планета несеться в тартарари http://blog.i.ua/community/2390/1129450/?p=5#p5
Наближається галактичний 3,14здець, а Вас якась інфузорія після коми цікавить...???
Galileo13
7 15:54, 01.12.2012
на рахунок програми,де її можна виконати?
Гість
8 19:45, 04.12.2012
3,14здец как это сложно!