Алгоритмические языки и программирование. Игошина Л.В. - 36 стр.

UptoLike

ВУЗ: 

ПГУ | Пенза

Составители: 

Рубрика: 

)2(
)1()12(
)12(
;
)1()12(
)12(
)!1()12(
!)1)1(2(
1
1
1
+⋅−⋅
+⋅⋅⋅
=
+⋅−⋅
+⋅⋅
=
+⋅−⋅⋅
⋅−+⋅⋅
=
+
+
+
nn
nxa
a
тогда
nn
nx
nnx
nnx
a
a
n
n
n
n
n
n
Вычислим a
1
по исходной формуле (1): а
1
= x(2-1)/1!=x.
Воспользуемся этим результатом для задания начального значения а и
суммы членов ряда S.
При составлении алгоритма и программы будем считать, что точность
получена, если на очередном шаге вычислений значение а
n
< ε.
Входные данные: х и ε (еps - обозначение в программе).
Схема алгоритма с использованием цикла While ... Do
нет
да
продолжение цикла
Текст программы
{Лабораторная работа 4}
{Вычисление суммы членов ряда с использованием оператора WHILE}
{Студенты гр. ..... Фамилии…}
Uses crt; {Подключение стандартного модуля TP}
Var x,a,eps,S: real; n:integer;
BEGIN Clrscr; { Очистка экрана}
Writeln(' Введите x,eps'); read(x,eps);
Начало
Ввод
х и ε
a:=x; n:=1;
S:=a;
a>=ε
n:=n+1
Вычисление
а по ф-ле (2)
S:=S+a
Вывод
S
Конец 
   an+1 x n+1 ⋅ (2 ⋅ ( n + 1) − 1) ⋅ n!   x ⋅ (2 ⋅ n + 1)
       = n                              =                  ;
    an   x ⋅ ( 2 ⋅ n − 1) ⋅ (n + 1)! (2 ⋅ n − 1) ⋅ (n + 1)
   тогда
             an ⋅ x ⋅ (2 ⋅ n + 1)
   an+1 =                                        ( 2)
            (2 ⋅ n − 1) ⋅ (n + 1)
Вычислим a1 по исходной формуле (1): а1 = x(2-1)/1!=x.
     Воспользуемся этим результатом для задания начального значения а и
суммы членов ряда S.
     При составлении алгоритма и программы будем считать, что точность
получена, если на очередном шаге вычислений значение аn < ε.
     Входные данные: х и ε (еps - обозначение в программе).

              Схема алгоритма с использованием цикла While ... Do

                     Начало


                     Ввод                                               Вывод
                                                         n:=n+1          S
                    хиε


                 a:=x; n:=1;                            Вычисление      Конец
                   S:=a;                                а по ф-ле (2)



                                    нет
                      a>=ε                               S:=S+a

                      да
                      продолжение цикла


                                          Текст программы
    {Лабораторная работа 4}
   {Вычисление суммы членов ряда с использованием оператора WHILE}
            {Студенты гр. ..... Фамилии…}
 Uses crt; {Подключение стандартного модуля TP}
  Var x,a,eps,S: real; n:integer;
 BEGIN         Clrscr; { Очистка экрана}
  Writeln(' Введите x,eps');    read(x,eps);

Страницы