
у меня такой последовательности не получается...(
1. Заголовок темы должен быть информативным. В противном случае тема удаляется ...
2. Все тексты программ должны помещаться в теги [code=pas] ... [/code], либо быть опубликованы на нашем PasteBin в режиме вечного хранения.
3. Прежде чем задавать вопрос, см. "FAQ", если там не нашли ответа, воспользуйтесь ПОИСКОМ, возможно такую задачу уже решали!
4. Не предлагайте свои решения на других языках, кроме Паскаля (исключение - только с согласия модератора).
5. НЕ используйте форум для личного общения, все что не относится к обсуждению темы - на PM!
6. Одна тема - один вопрос (задача)
7. Проверяйте программы перед тем, как разместить их на форуме!!!
8. Спрашивайте и отвечайте четко и по существу!!!
![]() ![]() |
![]() |
Ven |
![]()
Сообщение
#21
|
Новичок ![]() Группа: Пользователи Сообщений: 15 Пол: Женский Репутация: ![]() ![]() ![]() |
|
IUnknown |
![]()
Сообщение
#22
|
![]() Гуру ![]() ![]() ![]() ![]() ![]() Группа: Пользователи Сообщений: 1 013 Пол: Мужской Ада: Разработчик Embarcadero Delphi: Сторонник Free Pascal: Разработчик Репутация: ![]() ![]() ![]() |
Ven, я не понимаю, в чем проблема? Ты задаешь точность в одну сотую, то есть хочешь, чтобы в ответе были как минимум 2 цифры после запятой правильны. Так? Получаешь
Otvet : X=-9.01...E-0001 , то есть, если перейти от экспоненциального представления к более привычному: - 0.901... Все, как заказывала, 2 цифры после запятой правильные... Когда точность задана в одну тысячную - значит, надо чтоб как минимум три цифры после запятой были точными. Что имеем? Otvet : X=-9.00075...E-0001 , или -0.900075... Опять все правильно. Три цифры точны, дальше - как повезёт. Тебе повезло, точны даже 4. Где подвох? Что не так? Печатай результат не в экспоненциальной форме, а в обычной: if (abs(x-x0)<=eps) then writeln ('Otvet: X=', x:15 :10), не надо будет переводить в привычный вид, сразу будет печататься в нём. Сообщение отредактировано: IUnknown - |
Ven |
![]()
Сообщение
#23
|
Новичок ![]() Группа: Пользователи Сообщений: 15 Пол: Женский Репутация: ![]() ![]() ![]() |
я конечно понимаю что мне еще далеко до осознания того что происходит, но всё же спрошу- а как "перейти от экспоненциального представления к более привычному"?))
не успела спросить,вы уже дополнили))сейчас попробую)спс) Сообщение отредактировано: Ven - |
Krjuger |
![]()
Сообщение
#24
|
Профи ![]() ![]() ![]() ![]() Группа: Пользователи Сообщений: 652 Пол: Мужской Реальное имя: Алексей Репутация: ![]() ![]() ![]() |
Блин,уже все разъяснили,долго писал,удалите мой пост.
Сообщение отредактировано: Krjuger - |
Ven |
![]()
Сообщение
#25
|
Новичок ![]() Группа: Пользователи Сообщений: 15 Пол: Женский Репутация: ![]() ![]() ![]() |
Еще подскажите пож-та. Тут вообще 2 корня:-0,9 и -0,1.
последний он считает только при хо= -0,1... можно ли сделать чтобы при нуле считал? (там более точно будет получаться) Когда ввожу хо=0 он считает его только при эпс=0,1, если беру 0,01 и тд.- ошибка 205 опять... Пы.Сы. Извиняюсь за такое кол-во вопросов, просто очень хочется разобраться в этой программе.. интересно... надо же чему-то учиться) Сообщение отредактировано: Ven - |
IUnknown |
![]()
Сообщение
#26
|
![]() Гуру ![]() ![]() ![]() ![]() ![]() Группа: Пользователи Сообщений: 1 013 Пол: Мужской Ада: Разработчик Embarcadero Delphi: Сторонник Free Pascal: Разработчик Репутация: ![]() ![]() ![]() |
Цитата можно ли сделать чтобы при нуле считал? Можно:x0:=x;, но тогда не будет считать второй корень при начальном приближении = -1. |
Ven |
![]()
Сообщение
#27
|
Новичок ![]() Группа: Пользователи Сообщений: 15 Пол: Женский Репутация: ![]() ![]() ![]() |
|
Krjuger |
![]()
Сообщение
#28
|
Профи ![]() ![]() ![]() ![]() Группа: Пользователи Сообщений: 652 Пол: Мужской Реальное имя: Алексей Репутация: ![]() ![]() ![]() |
Ну как вариант ввести такую переменную,как a=1/f'(xn).Тогда мы получим старый добрый метод Ньютона.
Xn+1=Xn-αf(Xn),где α=1/f'(Xn ) Сообщение отредактировано: Krjuger - |
![]() ![]() |
![]() |
Текстовая версия | 1.09.2025 20:23 |