Інтерполяція функції в прямокутнику, Детальна інформація

Інтерполяція функції в прямокутнику
Тип документу: Курсова
Сторінок: 27
Предмет: Математика
Автор: Орос Володимир
Розмір: 182.2
Скачувань: 1447
Микеладзе Ш. Е. Численные методы математического анализа. – М.: Гостехиздат, 1953. – с. 527

Скоробогатько В. Я. Теория ветвящихся цепных дробей и ее применение в вычислительной математике. – М.: Наука, 1983.–312 с.

Бахвалов Н.С. Численные методы. – М.: Наука, 1975. – 600 с.

Таранов П.С. Введение в програмирование. – Харьков, Сталкер, 1996.

Інтерполювання функцій однієї змінної: Методична розробка. – Ужгород, УжДУ, 1998. – 35с.

Гаврилюк І. П., Макаров В. Л. Методи обчислень. У 2 ч. – К.: Вища школа, 1995. – Ч. 1. – 367 с.

Григоренко Я. М., Панкратова Н. Д. Обчислювальні методи в задачах прикладної математики. – К.: Либідь, 1995. – 280 с.

Додаток.

Інструкція користувача та

тексти програм.

Для проведення обчислювальних експериментів по інтерполюванню функцій двох змінних було складено програму, яка будує двовимірний інтерполяційний многочлен (у формі Лагранжа) і двовимірний інтерполяційний ланцюговий дріб з подальшою перевіркою на точність наближення. Проміжки інтерполювання і кількість точок розбиття проміжку по х і по у а також кількість контрольних точок розбиття по кожній змінній (для оцінки похибки) задаються в програмі. На виході програма генерує текстовий файл з максимальними абсолютними і відносними похибками наближення. Функція двох дійсних змінних, яку потрібно інтерполювати, задається безпосередньо в текстах програм в функції Func(). Константи MaxX i MaxY визначають максимальну кількість точок розбиття по відповідних змінних.

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

{$A+,B+,D+,E+,F-,G-,I+,L+,N-,O-,P-,Q+,R+,S+,T-,V+,X+}

{$M 65520,0,655360}

Uses Crt;

Const MaxX=50;

MaxY=50;

Type MyArr=Array[0..MaxX,0..MaxY] Of Real;

Var Nx,Ny,Cx,Cy:Integer;

X:Array[0..MaxX] Of Real;

Y:Array[0..MaxY] Of Real;

B:MyArr;

Xa,Xb,Ya,Yb:Real;

D1,D2:^MyArr;

cc,cc1:Integer;

Function Func(x,y:Real):Real;

Begin

Func:=1/(x*x+y*y+x*y);

End;

Procedure DataInput;

The online video editor trusted by teams to make professional video in minutes