![]() |
|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
![]() |
|
Опции темы | Поиск в этой теме |
![]() |
#1 |
Delphi Warrior
Старожил
Регистрация: 15.08.2008
Сообщений: 2,502
|
![]()
Вот код проги, по которой вычисляется sqrt(sqr(a) +b) по формуле разложения в ряд!
Код:
Код:
Mess with the best, die like the rest.
![]() Лабораторные, курсовые на Delphi\Pascal\C++ ya.flex-freelance@yandex.ru Icq - 636-954-303 |
![]() |
![]() |
![]() |
#2 |
Delphi Warrior
Старожил
Регистрация: 15.08.2008
Сообщений: 2,502
|
![]()
Извените народ Вот код
Код:
Mess with the best, die like the rest.
![]() Лабораторные, курсовые на Delphi\Pascal\C++ ya.flex-freelance@yandex.ru Icq - 636-954-303 |
![]() |
![]() |
![]() |
#3 |
Delphi Warrior
Старожил
Регистрация: 15.08.2008
Сообщений: 2,502
|
![]()
Памагите пажалуйста
Mess with the best, die like the rest.
![]() Лабораторные, курсовые на Delphi\Pascal\C++ ya.flex-freelance@yandex.ru Icq - 636-954-303 |
![]() |
![]() |
![]() |
#4 |
Старожил
Регистрация: 09.01.2008
Сообщений: 26,229
|
![]()
у Вас переполнение происходит....
либо формулы не те и ряд не сходится, либо Вы точность не с той переменной сравниваете... ну, например, попробуйте изменить на Код:
|
![]() |
![]() |
![]() |
#5 |
Старожил
Регистрация: 13.10.2007
Сообщений: 2,740
|
![]()
Проверил несколько шагов в Excel, формула некорректная, сумма колеблется близко к 0,98-0,99 и никогда не дойдет до точности даже 0,1. При точности 1,0 программа выполняет один шаг и выдает результат.
|
![]() |
![]() |
![]() |
#6 |
Delphi Warrior
Старожил
Регистрация: 15.08.2008
Сообщений: 2,502
|
![]()
Понятно! Значит не корректная формула! Спасибо! Кстати не подскажите мне фомулу! Если можно! Я с самого начала так думал! Большое спасибо!!!
Mess with the best, die like the rest.
![]() Лабораторные, курсовые на Delphi\Pascal\C++ ya.flex-freelance@yandex.ru Icq - 636-954-303 |
![]() |
![]() |
![]() |
#7 |
Участник клуба
Регистрация: 02.09.2007
Сообщений: 1,193
|
![]()
Если построить итерационный процесс вычисления функции y=sqrt(x) по методу Ньютона, то получим следующее: y(n+1)=(y(n)+x/y(n))/2
Код:
|
![]() |
![]() |
![]() |
#8 |
Delphi Warrior
Старожил
Регистрация: 15.08.2008
Сообщений: 2,502
|
![]()
Спасибо _Dmitry!формула в учебнике не правильная! я короче сразу заметил , что там нет зависимости между 2 и 3 членом ряда! Там короче следующий член ряда после 1 имеет в числителе 1, потом второй тоже имеет 1, а третий сразу 3! поэтому и хотел 1 и второй член объединить в одну переменную F2! ну апотом просто увеличивать там m и n!
Mess with the best, die like the rest.
![]() Лабораторные, курсовые на Delphi\Pascal\C++ ya.flex-freelance@yandex.ru Icq - 636-954-303 |
![]() |
![]() |
![]() |
![]() |
||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
задача в паскале, помогите пожалуйста я полный ноль | Arsenal777 | Помощь студентам | 8 | 03.06.2008 22:22 |
Дюди добрые помогите по ПАСКАЛЮ. Я полный ноль в нем )) | Jey_RO | Помощь студентам | 4 | 24.05.2008 13:06 |
Проверка деления на ноль (Как проверить?) | Moonka | Помощь студентам | 10 | 23.04.2007 19:41 |
Я-ноль: нужны проги для начала. Где? | kypto8 | Assembler - Ассемблер (FASM, MASM, WASM, NASM, GoASM, Gas, RosAsm, HLA) и не рекомендуем TASM | 4 | 31.03.2007 09:29 |
деление | natasha | Общие вопросы Delphi | 6 | 22.01.2007 12:39 |