Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2007.07.08;
Скачать: CL | DM;

Вниз

Помощь нужна   Найти похожие ветки 

 
DillerXX ©   (2007-06-02 18:24) [40]

/me стукнул TUser"a


 
Kostafey ©   (2007-06-02 18:35) [41]

> [40] DillerXX

Зря, TUser прав. Внимательно читаем.
Какие выводы следует сделать?


 
Kostafey ©   (2007-06-02 18:40) [42]

http://lib.web-malina.com/getbook.php?bid=3427


 
Думкин ©   (2007-06-03 05:00) [43]

3 в кубе, год рождения Толстого, год рождения Толстого, Пи на четыре, Пи на два, Пи на четыре.... :)
2,7 1828 1828 45 90 45....


 
Zagaevskiy ©   (2007-06-03 11:25) [44]

Классный отрывок!


 
Kostafey ©   (2007-06-03 14:15) [45]

> [43] Думкин ©   (03.06.07 05:00)

Сам придумал ?


 
DillerXX ©   (2007-06-03 22:08) [46]


> Думкин

Вы об чём?


 
Alien1769 ©   (2007-06-03 22:10) [47]

Если я правильно понял Думкина, ваш пост [28]


 
Думкин ©   (2007-06-04 05:39) [48]

> Kostafey ©   (03.06.07 14:15) [45]

Зачем сам? В 1988 году рассказали в школе.

> DillerXX ©   (03.06.07 22:08) [46]

Если почитать ветку, то нетрудно понять о чем я. Я бы набрал второй шифр по памяти до 16 знаков. Речь идет о запоминании. Вы же сами спрашивали.


 
TUser ©   (2007-06-04 07:57) [49]

http://fan.lib.ru/n/nesterenko_j_l/text_0040.shtml


 
Zagaevskiy ©   (2007-06-04 11:28) [50]

У меня получились такие значения exp(1) :

1    |  2
2    |  2,5
3    |  2,66666666666667
4    |  2,70833333333333
5    |  2,71666666666667
6    |  2,71805555555556
7    |  2,71825396825397
8    |  2,71827876984127
9    |  2,71828152557319
10  |  2,71828180114638
11  |  2,71828182619849
12  |  2,71828182828617

_________________________________________
где-то здесь по идее 2,7 1828 1828 45 90 45   |

13  |  2,71828182880375
14  |  2,71828182958565
15  |  2,71828183008457
16  |  2,71828183058353
17  |  2,71828182711759
18  |  2,71828182600454
19  |  2,71828183512516
20  |  2,71828183464945

Что я делаю не так? exp(1) = 2,71828182845905 - так Делфи выдаёт.


 
Думкин ©   (2007-06-04 11:29) [51]


> Zagaevskiy ©   (04.06.07 11:28) [50]

У тебя ошибка в 17-й строке.


 
Zagaevskiy ©   (2007-06-04 12:20) [52]


>
> Думкин ©   (04.06.07 11:29) [51]
>
> > Zagaevskiy ©   (04.06.07 11:28) [50]
>
> У тебя ошибка в 17-й строке.

В смысле? Я прогу написал там циклом от 1 до 20...И всё! Не получается у меня это e!


 
Думкин ©   (2007-06-04 12:30) [53]


> Zagaevskiy ©   (04.06.07 12:20) [52]

У тебя ошибка в 17-й строке.


 
Думкин ©   (2007-06-04 12:32) [54]

Или иначе: У тебя ошибка в проограмме.
У меня вот все ништяк:
1
2
2,5
2,66666666666667
2,70833333333333
2,71666666666667
2,71805555555556
2,71825396825397
2,71827876984127
2,71828152557319
2,71828180114638
2,71828182619849
2,71828182828617
2,71828182844676
2,71828182845823
2,71828182845899
2,71828182845904
2,71828182845905
2,71828182845905
2,71828182845905


 
Zagaevskiy ©   (2007-06-04 13:52) [55]

> Думкин ©   (04.06.07 12:32) [54]

Почему-то до этого места :2,71828182828617 всё правильно, а потом у меня резкий скачёк аж на 0,00000000051758! не могу понять , почему!

Делаю так : цикл по х от 1 до 20 , где увеличиваю переменную типа REAL на 1/х!
Факториал - отдельной ф-цией (от 1 до числа умножать) и вроде всё.
МОжет ты использовал не REAL? Я пробовал ещё EXTENDED и DOUBLE


 
Думкин ©   (2007-06-04 13:55) [56]

> Zagaevskiy ©   (04.06.07 13:52) [55]

Extended. Факториал считать не нужно, будешь считать тут - будешь призовые места получать только школьного уровня. :о)


 
Zagaevskiy ©   (2007-06-04 14:11) [57]

Ддааа... с факториалом я ступил ... Ладно учту на будущее. Но это ничего фактичеки не меняет : результат тот же и возможно скорость больше на несколько микросекунд? Что ты делаешь?

ЗЫ Как узнал про места?


 
Думкин ©   (2007-06-04 14:12) [58]

> Zagaevskiy ©   (04.06.07 14:11) [57]

Давай ты первый.
Ты сам в анкете хвастаешь.


 
Zagaevskiy ©   (2007-06-04 14:27) [59]


procedure TForm1.Button1Click(Sender: TObject);
var
 exponenta : Extended;
 i,fak : Integer;
begin
 exponenta:=1;
 fak:=1;
 Memo1.Clear;
 for i:=1 to 20 do
 begin
   fak:=fak*i;
   exponenta:=exponenta+(1/fak);
   Memo1.Lines.Add(FloatToStr(exponenta))
 end;
end;

Вот и всё на форму - кнопку и мемо.

ЗЫ
физ-мат 47 Выезная Олимпиада МФТИ II
физ Общегородская Олимпиада для школьников и студентов (Евразийский университет имени Гумилёва) I
инф - районная 2007 I
экон - город 2007 II
А я вообще забыл про ту анкету


 
Думкин ©   (2007-06-04 14:29) [60]

> Zagaevskiy ©   (04.06.07 14:27) [59]

Ты выведи значения факториалов по пути следования.


 
Zagaevskiy ©   (2007-06-04 14:42) [61]


> Думкин ©   (04.06.07 14:29) [60]
> > Zagaevskiy ©   (04.06.07 14:27) [59]
>
> Ты выведи значения факториалов по пути следования.

Согласен, integer не хватает,потом уходит в минус, но в той строке где скачок всё реально и след. фак. тоже считается нормально


 
Думкин ©   (2007-06-05 05:38) [62]

> Zagaevskiy ©   (04.06.07 14:42) [61]

Что нормально, что реально? Тогда явно посчитай шаг. При такой подготовке и первые места, представляю что из себя представляют 2, 3 и далее...


 
Думкин ©   (2007-06-05 05:42) [63]


> Zagaevskiy ©   (04.06.07 14:42) [61]

Какие фак считаются нормально? Вы можете в интежер выписать фак 13, 14-20? О чем вы вообще?


 
Zagaevskiy ©   (2007-06-05 13:54) [64]

Да ты прав в integer"е не правильно считает. Я не прав. Сделал int64 тогда работает. Но как сделать, чтоб е считалось скажем знака до 20-25?


 
Думкин ©   (2007-06-06 12:59) [65]

> Zagaevskiy ©   (05.06.07 13:54) [64]

Использовать библиотеку, свою или чужую для работы с такими числами. Я писал. 50000 знаков Е считал.



Страницы: 1 2 вся ветка

Текущий архив: 2007.07.08;
Скачать: CL | DM;

Наверх




Память: 0.59 MB
Время: 0.015 c
2-1181919052
леВый позЕр
2007-06-15 18:50
2007.07.08
рисование


3-1176275103
PEAKTOP
2007-04-11 11:05
2007.07.08
Транзакция и EXECUTE STATEMENT


15-1181063569
matt
2007-06-05 21:12
2007.07.08
Промышленные компьютеры


4-1170255120
tytus
2007-01-31 17:52
2007.07.08
Как получить доступ к контролам другого окна?


3-1175946319
boristt
2007-04-07 15:45
2007.07.08
Перехват ошибки от MSSQL Express 2005 (dbExpress)