Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Прочее";
Текущий архив: 2007.07.08;
Скачать: [xml.tar.bz2];

Вниз

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

 
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;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.57 MB
Время: 0.047 c
2-1181837495
Bullfrog
2007-06-14 20:11
2007.07.08
Not enough actual parametres


15-1181164631
KJ
2007-06-07 01:17
2007.07.08
Форма обратная


3-1175791322
Kley
2007-04-05 20:42
2007.07.08
Фильтрация при открытии формы


15-1181221627
Vendict
2007-06-07 17:07
2007.07.08
Градиент через div


3-1176233234
sholomgf
2007-04-10 23:27
2007.07.08
Помогите с запросом MYSQL ...





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский