-
Лабораторная работа №6
Тема: Циклы итерационного типа
ВАРИАНТЫ ЗАДАНИЙ К ЛАБОРАТОРНОЙ РАБОТЕ № 6
Задание. Составить программу функции, разложенной в ряд:
а) Напишите программу вычисления суммы ряда в соответствии с Вашим вариантом задания.
Отчитайтесь преподавателю о выполнении задания.
б) Измените программу так, чтобы она запрашивала 3 значения eps для каждого из трёх значений x (т.е. программа должна вычислить 9 значений сумм ряда).
|
№ вар. |
Задание |
Исходные данные |
|
1 |
Составить программу вычисления ряда:
|
До выполнения условия
|
|
2 |
Составить программу вычисления ряда:
|
Для a = 0,13; 0,1; 0,78;
Где
|
|
3 |
Составить программу вычисления ряда
|
До выполнения условия
|
|
4 |
Составить программу вычисления ряда
|
До выполнения условия
|
|
5 |
Составить программу вычисления функции F(x), разложенной в ряд
|
До выполнения условия
|
|
6 |
Составить программу вычисления функции F(x), разложенной в ряд
|
До выполнения условия
|
|
7 |
Составить программу вычисления функции Y(x), разложенной в ряд
|
До выполнения условия
|
|
8 |
Составить программу вычисления ряда
|
До выполнения условия
|
|
9 |
Составить программу вычисления функции F(x), разложенной в ряд
|
До выполнения условия
|
|
10 |
Составить программу вычисления функции F(x)
|
До выполнения условия
|
|
11 |
Составить программу вычисления S(x), разложенной в ряд
|
До выполнения условия
|
|
12 |
Составить программу вычисления функции F(x), разложенной в ряд
|
До выполнения условия
|
|
13 |
Составить программу вычисления функции F(x)
|
До выполнения условия
|
|
14 |
Составить программу вычисления ряда
|
До выполнения условия
|
|
15 |
Составить программу вычисления функции F(x), разложенной в ряд
|
До выполнения условия
|
|
16 |
Составить программу вычисления функции F(x), разложенной в ряд
|
До выполнения условия
|
|
17 |
Составить программу вычисления функции F(x)
|
До выполнения условия
Где
|
|
18 |
Составить программу вычисления ряда
|
До выполнения условия
|
|
19 |
Составить программу вычисления функции F(x), разложенной в ряд
|
До выполнения условия
|
|
20 |
Составить программу вычисления F(x), разложенной в ряд
|
До выполнения условия
|
|
21 |
Составить программу вычисления F(x), разложенной в ряд
|
До выполнения условия
, где
= 001; 0,01; 0,001 x = 0,1; 0,7; 0,9 |
|
22 |
Составить программу вычисления F(x), разложенной в ряд
|
До выполнения условия
,где
x = 1,3505; 1,37; 1,38 |
|
23 |
С
|
До выполнения условия
,где
= 0,001; 0,001; 0,01 x = 0,205; 0,204; 0,200 |
|
24 |
С
|
До выполнения условия
,где
= 0,005; 0,0001; 0,001 x = 14,1; 10,4; 8,7 |
|
25 |
С
|
До выполнения условия
,где
= 0,001; 0,0005; 0,001 x = 0,51; 0,708; 0,9 |
|
26 |
С
|
До выполнения условия
,где
x = 0,71; 0,848; 0,9 |
|
27 |
Составить программу вычисления F(x), разложенной в ряд
|
До выполнения условия
,где
=0,001; 0,005; 0,0001 x=0,4; 0,6; 0,8 |
|
28 |
Составить программу вычисления F(x), разложенной в ряд
|
До выполнения условия
г = 0,001; 0,005; 0,0001 x =1,0472; 0,9471; 0,7831 |
|
29 |
Составить программу вычисления F(x), разложенной в ряд
|
До выполнения условия
г = 0,0001; 0,0005; 0,001 x =4,36; 4,37; 5,01 |
|
30 |
Составить программу вычисления F(x), разложенной в ряд
|
До выполнения условия
,где = 0,001; 0,0001; 0,0005 x = 1,5; 1,7; 2,4 a = 2,3 |
,
где
до
выполнения условия
,
при решении принять
при
решении принять
где
где
где
где
где
где
где
где
- заданная степень точности; n-порядковый
номер очередного члена ряда (в скобках).
где
где
где
где
где
где
где
= 0,001; 0,001; 0,01
оставить
программу вычисления F(x),
разложенной в ряд
оставить
программу вычисления S(x),
разложенной в ряд
оставить
программу вычисления F(x),
разложенной в ряд
оставить
программу вычисления F(x),
разложенной в ряд
= 0,0005; 0,0001; 0,01
де
де
Пример.
Вычислить сумму элементов ряда
Решение.
Пусть x=2;
|
= |
= |
= |
= |
= |
= |
= |
0,5 0,25 0,125 0,062 0,031 0,015 0,007
Таким образом, ряд является сходящимся, т.е. каждый последующий член меньше предыдущего.
Последний член ряда (при x=7) равен 0,007. Это < 0,01. Следовательно, условие
выполняется и можно прекратить вычисления и считать полученную сумму суммой ряда с
точностью до 0,01.
1.Блок-схема алгоритма решения приведена на рисунке.
Нет
Да
2.Текст программы.
Var F,x,S,eps:real;
n:integer;
begin
Write(Введите x=‘’); Readln(x);
Write(‘Введите eps=’); Readln(eps);
F:=0; n:=1;
Repeat S:=1/exp(n*ln(x));
F:=F+S;
N:=n+1;
Until abs(S)<=eps;
Write(‘при x=’,x:5:2,’eps=’,eps:10:5,’F(x)=’,F:10:5);
Readln;
End.
3.Результат выполнения контрольного примера.
При x= 2.00 eps= 0.01000 F(x)= 0.99219