Изучение методики приближенного представления функций в виде интерполяционного полинома

Страницы работы

Содержание работы

МО РФ

Новосибирский государственный

технический университет

Кафедра автоматики

Лабораторная работа №1

по курсу «Вычислительная математика»
Вариант  №5

Факультет: АВТ

Группа: АП-219

Студенты:   Фомин Р.

                    Баженов Д.

                    Высоцкий А.

Проверил: Чикильдин Г.П.

Новосибирск

2004

 

1.Цель работы

          Ознакомиться с методикой приближенного представления функций в виде интерполяционного полинома и способами оценивания погрешностей интерполяции.

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

          Вычислить приближенные значения функции y = f(x), x[a, b] с шагом  (= 0,1) посредством интерполяционного полинома (n = 2, 3, 4), определенного через  в узлах интерполяции  (N = 3, 4, 5) с шагом h = (b - a)/(N - 1) = const на интервале [a, b].

          Оценить погрешности интерполирования функции y = f(x) на интервале [a, b].

          Исследовать влияние количества узлов N (порядка n) на точность интерполирования

y = f(x)

[a,  b]

5

[0,8,  4,0]

3. Формула интерполяционного полинома  в общем виде.

Для заданной на [a, b] в узлах интерполяции  функции y = f(x) полином в общем виде , коэффициенты могут быть определены из системы линейных алгебраических уравнений


4. Листинг программы.

          real x(51),y(51),u(5,5),v(5),pk(5),p(51),e(51)

          print*,'N->'

          read*,N

          a=0.8

          b=4.0

          h=(b-a)/(N-1)

          do 1 i=1,N

          x(i)=a+(i-1)*h

    1    y(i)=exp(x(i))*cos(x(i))

          call n1ysau (N,x,y,u,v)

          call n1ygau (u,v,pk,N)

          write (1,101) N

          write (1,102) (x(i),i=1,N)

          write (1,102) (y(i),i=1,N)

          write (1,102) (pk(i),i=1,N)

          dx=0.1

          kn=(b-a)/dx+1.1

          do 2 k=1,kn

          x(k)=a+(k-1)*dx

          y(k)=exp(x(k))*cos(x(k))

          p(k)=0

          do 2 i=1,N

    2    p(k)=p(k)+pk(i)*x(k)**(i-1)

          call n1yeee (y,p,kn,e,em,es,ep,emo,eso,epo)

          do 3 k=1,kn

    3    write (2,103) x(k),y(k),p(k),e(k)

          write (2,104) Emo,Eso

101   format (3x,'N=',i1)

102   format (5(1x,f8.3))

103   format (3x,f5.2,3(2x,e11.4))

104   format (3x,'Emo=',e11.4,2x,'Eso=',e11.4)

          stop

          end


5. Результаты вычислений для N = 3, 4, 5

Интерполирование ведется по таблице

***

X

Y=F(X)

***

***

0.800

1.551

***

***

2.400

-8.128

***

***

4.000

-35.688

***

Степень полинома n=2

Коэффициенты полинома: -0.315    5.126   -3.492

K

X

F(X)

 Pn(x)

E(X)

1

0,80

1,55E+00

-1,55E+00

1,19E-07

2

0,90

1,53E+00

1,47E+00

5,95E-02

3

1,00

1,47E+00

1,32E+00

1,50E-01

4

1,10

1,36E+00

1,10E+00

2,65E-01

5

1,20

1,20E+00

8,07E-01

3,96E-01

6

1,30

9,82E-01

4,47E-01

5,35E-01

7

1,40

6,89E-01

1,63E-02

6,73E-01

8

1,50

3,17E-01

-4,84E-01

8,01E-01

9

1,60

-1,45E-01

-1,05E+00

9,09E-01

10

1,70

-7,05E-01

-1,69E+00

9,89E-01

11

1,80

-1,37E+00

-2,40E+00

1,03E+00

12

1,90

-2,16E+00

-3,18E+00

1,02E+00

13

2,00

-3,08E+00

-4,03E+00

9,58E-01

14

2,10

-4,12E+00

-4,95E+00

8,29E-01

15

2,20

-5,31E+00

-5,94E+00

6,30E-01

16

2,30

-6,65E+00

-7,00E+00

3,54E-01

17

2,40

-8,13E+00

-8,13E+00

0,00E+00

18

2,50

-9,76E+00

-9,33E+00

-4,33E-01

19

2,60

-1,15E+01

-1,06E+01

-9,41E-01

20

2,70

-1,35E+01

-1,19E+01

-1,52E+00

21

2,80

-1,55E+01

-1,33E+01

-2,15E+00

22

2,90

-1,77E+01

-1,48E+01

-2,83E+00

23

3,00

-1,99E+01

-1,64E+01

-3,52E+00

24

3,10

-2,22E+01

-1,80E+01

-4,19E+00

25

3,20

-2,45E+01

-1,97E+01

-4,82E+00

26

3,30

-2,68E+01

-2,14E+01

-5,34E+00

27

3,40

-2,90E+01

-2,33E+01

-5,71E+00

28

3,50

-3,10E+01

-2,52E+01

-5,86E+00

29

3,60

-3,28E+01

-2,71E+01

-5,70E+00

30

3,70

-3,43E+01

-2,92E+01

-5,15E+00

31

3,80

-3,54E+01

-3,13E+01

-4,09E+00

32

3,90

-3,59E+01

-3,34E+01

-2,42E+00

33

4,00

-3,57E+01

-3,57E+01

0,00E+00

Погрешности:       Eмo = 0.1633E+00

                               Eco  = 0.1505E+00

Похожие материалы

Информация о работе

Тип:
Отчеты по лабораторным работам
Размер файла:
215 Kb
Скачали:
0