Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Посчитать число е


Romkaa ©   (2005-06-02 15:32:00) 

Как посчиать число е с точнотью до 10 в -6 степени


Борыч   (2005-06-04 13:49:00) [1]

> pasha_golub ©  (03.06.05 03:04) [12]
> Не видать тебе счастья 7 лет - примета такой. ;0)


Беседуют два старика на скамеечке:
- Вот незадача! Вчера нечаянно зеркало задел - оно и разбилось. Теперь семь лет неудачи преследовать будут.
- Да ничего подобного! Вот у меня сосед зеркало разбил, так его всего через год трамвай переехал.


Alx2   (2005-06-03 10:50:00) [2]

Jeer ©   (03.06.05 10:32) [16]

Вестимо на что. Давим неохоту подумать грубой силой....


Jeer   (2005-06-03 10:32:00) [3]

Думкин ©   (03.06.05 08:00) [15]

Вот и думаешь, а на что обычно тратится такая мощь:(


Думкин   (2005-06-03 08:00:00) [4]

> [11] VMcL ©   (02.06.05 23:57)

У меня эта программа дома лежит. И Пи и Е считал по ней за 100 лимонов знаков. Самое интересное - за вполне приемлемое время. Только помыться успел.
Проверять все в лом было - но 50000 первых знаков посчитаныых мной лично - совпали.

А ведь помню статью в Кванте за ...1985? год - что японцы посчитали 100 лимонов на супер-пупер компе. А теперь это спокойно делает пень. :)


VMcL   (2005-06-03 07:53:00) [5]

Ни себе фига:
> By 1988 Japanese computer scientist Yasumasa Kanada had reached 201,326,000 decimal places. In 2002 Kanada and fellow researchers at Japan's Information Technology Center set a new record for finding the number of digits of π -- 1.24 trillion decimal places. This calculation took about 602 hours.


Просто Джо   (2005-06-03 03:45:00) [6]

> [10] Fredy314 ©   (02.06.05 21:32)
Я, я тоже с рядом Тейлора знаком! А что - за это где-то наливают? ;^)


>  [11] VMcL ©   (02.06.05 23:57)

Да, забавная идея :)


pasha_golub   (2005-06-03 03:04:00) [7]

MakedoneZ ©   (02.06.05 19:02) [9]
Друг, мой, к чему такой пафос? Или вы думаете, что вы один тут такой... с терминами знакомый? ;0)

VMcL ©   (02.06.05 23:57) [11]
Не видать тебе счастья 7 лет - примета такой. ;0)


VMcL   (2005-06-02 23:57:00) [8]

>> Fredy314 ©   (02.06.05 21:32) [10]

> Была у меня одна програмулина вычисляла ПИ до 64к знаков после запятой

Был (а может и до сих пор есть) японский сайт (что-то типа http://3.14159265358979323....jp). Выдавал знаки числа Pi в текстовом виде. Я после 20-ти мегабайтобломался ждать пока страница догрузится :-D

P.S. Жаль этот файл умер с недавно почившим винтом :'(


Fredy314   (2005-06-02 21:32:00) [9]

Не я больше по числу ПИ=3,141592653589793238462643383279...
Была у меня одна програмулина вычисляла ПИ до 64к знаков после запятой жаль потерялась гдето 8-(


MakedoneZ   (2005-06-02 19:02:00) [10]


> Как посчиать число е с точнотью до 10 в -6 степени

Друг мой! Ты с рядом Тейлора знаком?
Вот по нему и вычисляй,ровно как и sin,и cos,и другие тригонометрические ф-ии.


pasha_golub   (2005-06-02 17:54:00) [11]

Уважающий себя программер, должен помнить е с точностью до 7 знака после запятой. ;0)


MBo   (2005-06-02 17:52:00) [12]

Эх, только 3 верных знака выдает :((

function CalcE: Extended;
var
 Buf1: array of Double;
 i, Cnt: Integer;
 Rnd, Sum: Double;
begin
 Randomize;
 SetLength(Buf1, 1000000);
 for i := 0 to High(Buf1) do begin
   Sum := 0;
   Cnt := 0;
   repeat
     Inc(Cnt);
     Rnd := Random;
     Sum := Sum + Rnd;
   until Sum >= 1.0;
   Buf1[i] := Cnt;
 end;
 Result := Mean(Buf1);
end;


TUser   (2005-06-02 16:05:00) [13]

А у меня-то Л.Толстой на 3 года старше :)


Alx2   (2005-06-02 15:48:00) [14]

Или даже так: :)
2.718281828459045235360287471352662497757247093699959574966967627
72407663035354759457138217852516642742746639193200305992181741359
66290435729003342952605956307381323286279434907632338298807531952
51019011573834187930702154089149934884167509244761460668082264800
16847741185374234544243710753907774499206955170276183860626133138
45830007520449338265602976067371132007093287091274437470472306969
77209310141692836819025515108657463772111252389784425056953696770
78544996996794686445490598793163688923009879312773617821542499922
95763514822082698951936680331825288693984964651058209392398294887
93320362509443117301238197068416140397019837679320683282376464804
29531180232878250981945581530175671736133206981125099618188159304
16903515988885193458072738667385894228792284998920868058257492796
10484198444363463244968487560233624827041978623209002160990235304
36994184914631409343173814364054625315209618369088870701676839642
43781405927145635490613031072085103837505101157477041718986106873
96965521267154688957035035402123407849819334321068


BFG9k   (2005-06-02 15:48:00) [15]

exp(1) :)


VMcL   (2005-06-02 15:43:00) [16]

Даже так: 2.7182818284590452353602874713527


VMcL   (2005-06-02 15:42:00) [17]

2.718281828


TUser   (2005-06-02 15:41:00) [18]

2.718251

А если посчитать - то там простой ряд, посмотри у учебнике по математике


Наверх

Титульная страница Поиск, карта сайта Написать письмо