Сумма чисел Фибоначчи - Страница 2

AlexZir · 17.12.2012, 16:16

Читайте: Размышления о программировании. Числа Фибоначчи - Технический форум
Алгоритм решения:

Код:

алг фибоначчи 
нач
  цел pre1,pre2,tek,k
  вещ s,nn,eps
  s:=0
  eps:=0.5
  pre1:=1
  pre2:=1
  tek:=pre2
  k:=1
  nn:=1/tek
  нц пока nn>=eps
    k:=k+1
    s:=s+nn
    pre1:=pre2
    pre2:=tek
    tek:=pre1+pre2
    nn:=1/tek
  кц
 вывод "Сумма членов последовательности, не меньших ",eps, " равна ",s, нс
 вывод "Всего было проверено ",k," члена последовательности"
кон

На Pascal сами переводите, а то такая помощь будет больше на медвежью услугу смахивать.

kasper182 · 17.12.2012, 18:41

Цитата:

Сообщение от Vladimir_S

А он это без всякой программы. Члены ряда:
1 1 0.5 0.333 ....
Поскольку уже четвертый из них меньше указанной точности (0.5), то его и все последующие можно отбросить, а сумма первых трёх дает 2.5.
Короче говоря, мы пытаемся дать Вам понять, что точность 0.5 - это чушь, бред и полная ахинея. Такого не бывает. Может быть 0.0001, 0.00005 и т.п., ну, в крайнем случае, 0.001, но никак не больше. Уточните условие задачи.

нет, это именно 0.5
нужно составить программу суммы, чтобы считал при вводе eps=0.5

17.12.2012, 16:16	#11 (permalink)
AlexZir support Регистрация: 19.08.2007 Адрес: Зея Сообщений: 15,797 Записей в дневнике: 71 Сказал(а) спасибо: 166 Поблагодарили 203 раз(а) в 86 сообщениях Репутация: 75760	Читайте: Размышления о программировании. Числа Фибоначчи - Технический форум Алгоритм решения: Код: алг фибоначчи нач цел pre1,pre2,tek,k вещ s,nn,eps s:=0 eps:=0.5 pre1:=1 pre2:=1 tek:=pre2 k:=1 nn:=1/tek нц пока nn>=eps k:=k+1 s:=s+nn pre1:=pre2 pre2:=tek tek:=pre1+pre2 nn:=1/tek кц вывод "Сумма членов последовательности, не меньших ",eps, " равна ",s, нс вывод "Всего было проверено ",k," члена последовательности" кон На Pascal сами переводите, а то такая помощь будет больше на медвежью услугу смахивать.

Опции темы
Версия для печати Отправить по электронной почте
Опции просмотра
Линейный вид Комбинированный вид Древовидный вид

17.12.2012, 16:16
Helpmaster Member Регистрация: 08.03.2016 Сообщений: 0	Ознакомьтесь с этими ссылками Сумма ряда в Паскаль, ошибка Вывести список положительных чисел, список отрицательных чисел на C#

Ads
Яндекс Member Регистрация: 31.10.2006 Сообщений: 40200 Записей в дневнике: 0 Сказал(а) спасибо: 0 Поблагодарили 0 раз(а) в 0 сообщениях Репутация: 55070