Цикл с пост условием, Помогите))) Опции

[aRmAnI]

Найти сумму n членов последовательности 1,1+1/2+1/3,... первое, большее А и его номер...
Никак не получается сделать(((
надо выполнить в Turbo Pascal

И ещё, Определить минимальный член последовательности, заданный формулой Yn=Xn*sqr(2)-7Xn-1

Сообщение отредактировано: aRmAnI - 6.03.2011 1:13

[aRmAnI]

Вы не совсем правильно сделали)) после s:=s+1/n; writeln(s); надо поставить, чтобы он выводил суммы, а не считал сумму всего ряда, а первую сумму большую А он не выводит) и её надо выводить последней, вводим 10 5, и должно получится что 1 сумма =1, вторая = 1,5, третья = 1,83, четвёртая = 2,08, пятая = 2,28..... А вот шестой он должен вывести сумму которая превзойдёт А

Добавлено через 4 мин.
Есть с тобой какая то прямая связь? аська? скайп?