Организация циклов в программе

Постановка задачи:

Используя оператор цикла, найти сумму ряда с точностью e=10^-4, общий член

которого . Результат напечатать.

При определении суммы членов ряда следует использовать рекуррентную формулу, в нашем случае рекуррентная формула имеет вид:

При составлении программы считать, что точность достигнута, если а_n <10^-4

Текст программы:

program lab4{вариант № 11};

var sum,an:real;

n:integer;

begin

clrscr;

sum:=0;

an:=1;

n:=1;

while an>0.0001 do

begin

sum:=sum+an;

n:=n+1;

an:=an*(exp(n*(ln(n/(n+1)))));

end;

writeln('Сумма ',n,' элементов равна =',sum:7:6);

end.

Результат решения конкретного варианта:

Сумма 12 элементов равна =1.759641

Варианты заданий

1) Найти сумму целых положительных чисел, кратных 3 и

меньших 200.

2) Найти сумму целых положительных четных чисел,

меньших 100.

3) Найти сумму целых положительных нечетных чисел,

меньших 200.

4) Найти сумму целых положительных чисел, больших 20,

меньших 100 и кратных 3.

5) Найти сумму ряда с точностью e=10^-4, общий член

которого

6) Найти сумму ряда с точностью e=10^-4, общий член

которого

7) Найти сумму ряда с точностью e=10^-4, общий член

которого

8) Найти сумму ряда с точностью e=10^-4, общий член

которого

9) Найти сумму ряда с точностью e=10^-4, общий член

которого

10) Найти сумму ряда с точностью e=10^-4, общий член

которого

11) Найти сумму ряда с точностью e=10^-4, общий член

которого

12) Найти сумму ряда с точностью e=10^-4, общий член

которого

13) Найти сумму ряда с точностью e=10^-4, общий член

которого

14) Найти сумму ряда с точностью e=10^-4, общий член

которого

15) Найти сумму ряда с точностью e=10^-4, общий член

которого

16) Найти сумму ряда с точностью e=10^-4, общий член

которого

17) Найти сумму ряда с точностью e=10^-4, общий член

которого

18) Найти сумму ряда с точностью e=10^-4, общий член

которого

19) Найти сумму ряда с точностью e=10^-4, общий член

которого

20) Найти сумму 13 членов ряда, в котором

21) Найти сумму 15 членов ряда, в котором

22) Найти сумму 10 членов ряда, в котором

23) Найти сумму 9 членов ряда, в котором

24) Найти сумму 7 членов ряда, в котором