Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Паскаль, Turbo Pascal, PascalABC.NET
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 05.12.2017, 18:39   #1
Жиза
Новичок
Джуниор
 
Регистрация: 05.12.2017
Сообщений: 2
Вопрос Нахождение суммы бесконечно убывающего ряда (паскаль)

mod(x)< 0.5 y=arcctg(x^2)
y=x-x^2/2+x^3/3-x^4/4+x^5/5...
Жиза вне форума Ответить с цитированием
Старый 06.12.2017, 12:29   #2
digitalis
Старожил
 
Аватар для digitalis
 
Регистрация: 04.02.2011
Сообщений: 4,536
По умолчанию

Покуда Alex11223 не закрыл тему - разомнем мозги, поможем ленивым
Код:
var x,y,s,n,eps : real ;
  Write ('x=') ; Readln (x) ;
  Write (Eps=') ; Readln (eps) ;
  y := x ; t := x ; n := 2 ;
  repeat
   t :=  t * x  / (-n) ;
   y := y + t ;
   n := n + 1 ;
  until  Abs (t) < eps ;
  Writeln (y =',y) ;
Только откуда взялось, что это -
Цитата:
y=arcctg(x^2)
? Например, для х=0,4 ряд дает 0,329685
arcctg(0,4^2) = 1,412141

Последний раз редактировалось digitalis; 06.12.2017 в 12:45.
digitalis вне форума Ответить с цитированием
Старый 06.12.2017, 13:12   #3
Аватар
Старожил
 
Аватар для Аватар
 
Регистрация: 17.11.2010
Сообщений: 19,042
По умолчанию

Дык не правильно считаешь
Код:
t:=-t*x*(n-1)/n;
Повезло ТС ))
Если бы архитекторы строили здания так, как программисты пишут программы, то первый залетевший дятел разрушил бы цивилизацию

Последний раз редактировалось Аватар; 06.12.2017 в 13:16.
Аватар вне форума Ответить с цитированием
Старый 06.12.2017, 13:19   #4
Sciv
Старожил
 
Аватар для Sciv
 
Регистрация: 16.05.2012
Сообщений: 3,211
По умолчанию

Цитата:
Повезло ТС ))
А это подводные грабли, чтоб ТС не расслаблялся Также, как и отсутствие начала и конца программы
Начал решать проблему с помощью регулярных выражений. Теперь решаю две проблемы...
Sciv вне форума Ответить с цитированием
Старый 06.12.2017, 15:47   #5
digitalis
Старожил
 
Аватар для digitalis
 
Регистрация: 04.02.2011
Сообщений: 4,536
По умолчанию

1. Действительно, косяк. "Давненько я не брал в руки шашек!"
"Mea culpa, mea maxima culpa"
2. Члены ряда все равно быстро убывают, разница невелика, и попрежнему никакого отношения к ArcCtg не получается.
3. Я же честно предупредил, что не сходится.
=================================== =
А насчет отсутствия начала и конца... Дык не разжевать же и в рот положить,надо ТСу давать самую ссуть, и чтоб сам хоть руками поработал.

Before
2 0,160000 -0,080000 0,320000
3 -0,032000 0,010667 0,330667
4 0,004267 -0,001067 0,329600
5 -0,000427 0,000085 0,329685
1,412141
-------------------------------------
Now
2 0,160000 -0,080000 0,320000
3 -0,032000 0,021333 0,341333
4 0,008533 -0,006400 0,334933
5 -0,002560 0,002048 0,336981
6 0,000819 -0,000683 0,336299
1,412141

Последний раз редактировалось digitalis; 06.12.2017 в 15:51.
digitalis вне форума Ответить с цитированием
Старый 06.12.2017, 16:13   #6
Аватар
Старожил
 
Аватар для Аватар
 
Регистрация: 17.11.2010
Сообщений: 19,042
По умолчанию

То чепуха, на самом деле разложение ТС для функции ln(1+x)
Если бы архитекторы строили здания так, как программисты пишут программы, то первый залетевший дятел разрушил бы цивилизацию

Последний раз редактировалось Аватар; 06.12.2017 в 16:18.
Аватар вне форума Ответить с цитированием
Старый 06.12.2017, 16:43   #7
digitalis
Старожил
 
Аватар для digitalis
 
Регистрация: 04.02.2011
Сообщений: 4,536
По умолчанию

Точно, мой куркулятор согласен
Дают же, блин, задания, не вникнув в смысл.
digitalis вне форума Ответить с цитированием
Старый 06.12.2017, 17:25   #8
Аватар
Старожил
 
Аватар для Аватар
 
Регистрация: 17.11.2010
Сообщений: 19,042
По умолчанию

Мы же разобрались на пару с заданием. Значит и ТС должен )) Хотя навряд ли, было уже похожее от него, с решением. Это проще даже. А в задании скорее всего описка, таких же вариантов много, попробуй каждый проверь. Или ТС так переписал
Если бы архитекторы строили здания так, как программисты пишут программы, то первый залетевший дятел разрушил бы цивилизацию

Последний раз редактировалось Аватар; 06.12.2017 в 17:28.
Аватар вне форума Ответить с цитированием
Старый 07.12.2017, 03:16   #9
digitalis
Старожил
 
Аватар для digitalis
 
Регистрация: 04.02.2011
Сообщений: 4,536
По умолчанию

Цитата:
Сообщение от Аватар Посмотреть сообщение
таких же вариантов много, попробуй каждый проверь.
Ну дык преподы же за это деньги получают. Хотя какие деньги - такие и ...
"Якая яда - такая i хада" (бел. пословица)
digitalis вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
паскаль. сумма бесконечно убывающего ряда Marinaaaa Фриланс 6 25.10.2017 17:41
задача сумма бесконечно убывающего ряда. прога на паскаль Marinaaaa Помощь студентам 2 23.10.2017 16:17
Нахождение суммы ряда. Рекурсия. С++ Rezcik Помощь студентам 5 07.06.2017 14:08
Нахождение суммы бесконечно убывающего ряда. PascalABC alex-y Паскаль, Turbo Pascal, PascalABC.NET 2 14.11.2016 22:07
Нахождение суммы членов ряда vinci Общие вопросы C/C++ 0 16.03.2012 13:49