|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
12.11.2016, 15:56 | #1 |
Новичок
Джуниор
Регистрация: 12.11.2016
Сообщений: 2
|
Нахождение суммы бесконечно убывающего ряда. PascalABC
Помогите, пожалуйста, написать программу
Задание. "Нахождение суммы бесконечно убывающего ряда." Написать программу суммирования ряда, приведенного в таблице, при одном и том же значении аргумента и 2-х значениях точности, отличающихся друг от друга более чем на порядок. Сравнить полученные результаты с точным значением и сделать вывод о схождении ряда. Вычисления заканчивать при достижении заданной степени точности (т.е. когда очередной член ряда становится по модулю меньше введенного значения точности е ). |
13.11.2016, 11:06 | #2 |
Я самый любопытный
Участник клуба
Регистрация: 24.07.2012
Сообщений: 1,949
|
Код:
|
14.11.2016, 22:07 | #3 |
Старожил
Регистрация: 23.10.2010
Сообщений: 2,318
|
Нет. Не сойдёт.
Попробуйте получить решение при x= 0.4 Жаль, что проигнорировано моё недавнее замечание относительно того, какой алгоритм следует применять в таких случаях. Ещё раз. Вычисление факториала очень быстро порождает переполнение. В тоже время, как в этом случае, k = x/n мало и будет только уменьшаться с ростом n. Моё предложение: Код:
Writeln('s = ',s:5:10); Так понимаю, что неверно понята роль этих чисел s:m:n - это m позиций под все число, с учетом точки и возможного знака, а n - количество знаков после точки. При неверном формате результат всегда выдается верным, насколько это возможно. При правильном формате число m всегда больше n. Как-то так, ...
Как-то так, ...
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
PascalABC | faiter_on | Паскаль, Turbo Pascal, PascalABC.NET | 3 | 07.12.2014 19:46 |
PascalABC | Юся=) | Помощь студентам | 1 | 22.12.2011 19:09 |
PascalABC | ludan | Помощь студентам | 0 | 22.10.2011 22:50 |
3D в PascalABC | Рудко Дмитрий | Паскаль, Turbo Pascal, PascalABC.NET | 6 | 09.02.2010 13:02 |
PascalABC, uses | Gorny | Помощь студентам | 3 | 04.12.2009 13:12 |