Показать сообщение отдельно
  #1  
Старый 08.12.2008, 15:46
petr577 petr577 вне форума
Прохожий
 
Регистрация: 08.12.2008
Сообщения: 1
Репутация: 10
По умолчанию Помогите решить 2 задачки в Delphi

Помогите решить задачи:
1.Составить алгоритм нахождения суммы ряда с заданной точностью e. Использовать рекуррентные соотношения при вычислении очередного члена ряда. Вычисление заканчивается, если модуль очередного слагаемого становится меньше заданного значения точности (e), причем для этих рядов (при | x | < 1) абсолютная величина суммы всех отброшенных членов ряда будет меньше e. Для оценки правильности расчетов предусмотреть вычисление по контрольной формуле.
Ряд:

Контрольная формула:


2.Дана последовательность чисел а1, а2, …, аn. Найти положительную подпоследовательность наибольшей длины.

PS: Во 2-ой задаче должна выводится сама положительная подпоследовательность
Например,вот произвольная последовательность чисел:
-10 -14 -33 10 13 34 -18 -47 22 35 56 67 -17
Ответ: 22 35 56 67
Ответить с цитированием