Практикум Павлодар (075. 8) Ббк-32. 98-02я73 с д 72. Т. Дүзелбаев, Т. С. Сабыров



бет145/145
Дата31.01.2018
өлшемі16,08 Mb.
#36526
түріПрактикум
1   ...   137   138   139   140   141   142   143   144   145


Көп жағдайда функцияның түрін эмпирикалық әдіспен анықтайды. Олар: – сызықтық функция; – квадрат үшмүшелік; – дәрежелік функция ; y = a bx – көрсеткіштік функция ; у = a + b/x – гиперболалық функция; – гиперболалық функция; бөлшек-рационал функция; – логарифмдік функциялар болуы мүмкін.

2 Сызықтық интерполяция программасының листингі



program lin_inter;

uses crt;

const

nmax=100;



type

mas1=array[0..nmax] of real;

mas2=array[0..nmax] of real;

var


xr,yr,a,b: real;

i,n: integer;

x: mas1;

y: mas2;

label 1,2,3;

begin


3: window(1,1,80,25);textbackground(0);clrscr;

writeln('************************************************* *');

writeln('* *');

writeln('* Данной программой решается задача *');

writeln('* линейной интерполяции *');

writeln('* *');

writeln('**************************************************');

writeln;

writeln('Введите по парно исходные данные Х и У');

for i:=1 to n do

readln(x[i],y[i]);

writeln(' Введите Х-расчетное'); readln(xr);

i:=0;

1: i:=i+1;



if xr>x[i] then goto 1;

a:=(y[i]-y[i-1])/(x[i]-x[i-1]);

b:=y[i-1]-a*x[i-1];

yr:=a*xr+b;goto 2;

2: writeln (' Y-расчетное находится между точками х1=',x[i-1]:2:2,' и х2=', x);

goto 3;


end.

*******************************************************




program MNK;

uses crt;

const nmax=50;

var


n,m,i,j,k:integer;

r,s:real;

a:array[1..nmax,1..nmax] of real;

b,p,x,xx,y:array[1..nmax] of real;

procedure GAUSS;

var


c:array [1..nmax,1..nmax] of real;

j1,i1,k,i,j:integer;

s,c1:real;

Label 1,2,3,4,5,6;

BEGIN

k:=1;


1: i:=k+1;

if a[k,k]<>0 then goto 3;

2: i1:=k+1;

if a[i1,k]=0 then goto 2; j1:=i1;

For j:=1 to n do

begin


c[k,j]:=a[k,j];

a[k,j]:=a[j1,j];

a[j1,j]:=c[k,j];

end;


3: c1:=a[i,k]/a[k,k];

a[i,k]:=0;

j:=k+1;

4: a[i,j]:=a[i,j]-c1*a[k,j];

if j

begin


j:=j+1; goto 4;

end;


b[i]:=b[i]-c1*b[k];

if i

begin

i:=i+1; goto 3;



end;

if k

begin

k:=k+1; goto 1;



end;

{ for i:=1 to n do

for j:=1 to n do

writeln('A(',i,j,')=',a[i,j]:7:4);}

xx[n]:=b[n]/a[n,n];

i:=n-1;


5: j:=i+1; s:=0;

6: s:=s+a[i,j]*xx[j];

if j

begin


j:=j+1; goto 6;

end;


xx[i]:=(b[i]-s)/a[i,i];

if i>1 then

begin

i:=i-1; goto 5;



end;

{ for i:=1 to n do

writeln(xx[i]:7:4);}

end;


begin

writeln('Введите значение N,M');

readln(n,m);

writeln('Введите табличные значения Х,У');

for i:=1 to m do

readln(x[i],y[i]);

for i:=1 to n do

begin


for j:=i to n do

begin


a[i,j]:=0;

for k:=1 to m do

a[i,j]:=a[i,j]+exp((i+j-2)*ln(x[k]))

end;


b[i]:=0;

for k:=1 to m do

b[i]:=b[i]+y[k]*exp((i-1)*ln(x[k]))

end;


for i:=1 to n do

begin


for j:=i to n do

if i<>j then a[j,i]:=a[i,j]

end;

for i:=1 to n do



for j:=1 to n do

writeln(a[i,j]:7:4);

GAUSS;

writeln('Значения параметров эмпирической формулы');



for i:=1 to n do

begin


p[i]:=xx[i];

writeln('p(',i,')=',p[i]:7:4)

end;

r:=0;


for k:=1 to m do

begin


s:=0;

for i:=1 to n do

s:=s+p[i]*exp((i-1)*ln(x[k]));

r:=r+sqr(s-y[k]);

end;

r:=sqrt(r);



writeln('Среднеквадратичное отклонение R=',r:7:4)

end.


Әдебиеттер
1 Акулич И.Л. Математическое программирование в примерах и задачах: Учеб. пособие для студентов эконом. спец. вузов. - М.: Высш. шк., 1986.-319 с.

2 Алексеев В.Е., Ваулин А.С., Петрова Г.Б. Вычислительная техника и программирование: Практикум по программированию/ Под ред. А. В. Петрова.– М.: Высш. шк., 1991.– 400 с.

3 Балапанов Е.Қ., Бөрібаев Б., Дәулетқұлов А.Б. Жаңа информациялық технологиялар: информатикадан 30 сабақ.- Алматы: ЖТИ. 2004.- 400 б.

4 Боглаев Ю.П. Вычислительная математика и программирование: Учеб. пособие для студентов втузов. - М.: Высш. шк., 1990.- 544 с.

5 Вентцель Е.С., Овчаров Л.А. Прикладные задачи теории вероятностей. – М.: Радио и связь, 1983.- 416 с.

6 Воробьева Г.Н., Данилова А.Н. Практикум по вычислительной математике: Учеб. пособие для техникумов. – М.: Высш. шк., 1990. – 208 с.

7 Вычислительная техника и программирование: Учеб. для техн. вузов/ Под ред. А.В. Петрова.– М.: Высш. шк., 1990.– 479 с.

8 Гершгорн А.С. Математическое программирование и его применение в экономических расчетах: Учебник для торг. и кооп. вузов. - М.: «Экономика», 1968.-200 с.

9 Дегтярев Ю.И. Исследование операций: Учеб. для вузов по спец. АСУ. - М.: Высш. шк., 1986.-320 с.

10 Дузельбаев С.Т. Информатика. Программа, методические указания и контрольные задания для студентов-заочников инженерно-технических специальностей высших учебных заведений. - Павлодар: РИО ПГУ, 2003.- 76 с.

11 Дузельбаева А.С., Дузельбаев С.Т., Ворожцова С.В., Шевченко В.Я., Юсубекова С.О. Языки и основы программирования, часть –1: Учеб. пособие для вузов и колледжей /Под ред. д.т.н., проф. Б.Б. Телтаева.- Павлодар: РИО ПГУ, 2002.- 136 с.

12 Дузельбаева А.С., Дузельбаев С.Т., Ворожцова С.В., Шевченко В.Я., Юсубекова С.О. Языки и основы программирования, часть –2: Учеб. пособие для вузов и колледжей /Под ред. д.т.н., проф. Б.Б. Телтаева.- Павлодар: РИО ПГУ, 2003.- 136 с.

13 Дузельбаев С.Т., Хацевский В.Ф., Токарчук В.К., Юсубекова С.О. Персональный компьютер в задачах электротехники: Учеб. пособие.–Алматы.: РИК по УМЛ МО РК, 1996.– 85 с.

14 Дузельбаева А.С., Дузельбаев С.Т., Юсубекова С.О. Основы алгоритмизации и программирования: Учеб. пособие для колледжей .- Астана: РИО ПГУ, 2004.- 165 с.

15 Иванилов Ю.П., Лотов А.В. Математические модели в экономике: Учеб. пособие для студентов вузов. - М.: Наука, 1979.-304 с.

16 Информатика: Базовый курс/ С.В.Симонович и др.– СПб.: Питер, 2000.– 640 c.

17 Исследование операций в экономике. / Под. ред. Н.Ш. Кремера. - М.: Банки и биржи, ЮНИТИ, 1997.- 400 с.

18 Каганов В.И. Компьютерные вычисления в средах EXCEL и MathCAD. – М.: Горячая линия – Телеком, 2003. – 328 с.

19 Карасев А.И., Кремер Н.Ш., Савельев Т.И. Математические методы и модели в планировании. – М.: Экономика, 1987.- 300 с.

20 Карасев А.И. Теория вероятности и математическая статистика. - М.: Статистика, 1979.- 320 с.

21 Карпелевич Ф.И., Садовский Л.Е. Элементы линейной алгебры и линейного программирования: Учеб. пособие для технических учебных заведений. - М.: Наука, 1967 312 с.



22 Кожин А.П., Мезенцев В.Н. Математические методы в планировании и управлении грузовыми автомобильными перевозками: Учеб. для вузов. – М.: Транспорт, 1994. – 304 с.

23 Компьютерные технологии обработки информации: Учеб. пособие/ С.В. Назаров, В.И. Першинов, В.А. Тафинцев и др./ Под ред. С.В. Назарова.–М.: Финансы и статистика, 1995.– 248 с.

24 Кремер Н.Ш. Математическая статистика. - М.: Экономическое образование, 1992.- 340 с.

25 Кудрявцев Е.М. Mathcad 2000 Pro. – М.: ДМК Пресс, 2001. – 576 с.

26 Культин Н. Turbo Pascal 7.0.– СПб.: БХВ – Санкт-Петербург, 1998.– 336 с.

27 Культин Н. Самоучитель. Программирование в Turbo Pascal 7.0 и Delphi.–СПб.: БХВ – Санкт-Петербург, 1999.– 404 с.

28 Математическое программирование. / Под. ред. Н.Ш. Кремера. – М.: Финанстатинформ, 1995.– 270 с.

29 Мухачева Э.А., Рубинштейн Г.Ш. Математическое программирование: Учеб. пособие для студентов вузов. - М.: Наука, 1977.-320 с.

30 Плис А.И., Сливина Н.А. Лабораторный практикум по высшей математике: Учеб. пособие для втузов. – М.: Высш. шк., 1983. – 208 с.

31 Плис А.И., Сливина Н.А. Mathcad 2000. Математический практикум для экономистов и инженеров: Учеб. пособие. – М.: Финансы и статистика, 2000. – 656 с.

32 Ромакин М.И. Элементы линейной алгебры и линейного программирования: Учеб. пособие для студентов эконом. и инженерно-экономических спец. вузов. - М.: Высш. шк., 1963.-278 с.

33 Сабыров Т., Қасенұлы Ш., Жамантаев А.Ш., Бергузинова Т.М., Исмағұлова Н.М., Әбенова Д.Т. Экономиканың математикалық әдістері мен моделдеріне арналған есептер мен жаттығулар жинағы. – Павлодар: РИО ПГУ., 2003. -120 с.

34 Тюрин Ю.Н., Макаров А.А. Анализ данных на компьютере/ Под. ред. В.Э. Фигурнова.–М.: ИНФРА – М, Финансы и статистика, 1995.– 384 с.

35 Шәріпбаев А.А. Информатика. Оқу құралы.- Астана, Нұржол, 2003.- 200 б.

36 Фаронов В.В. Турбо Паскаль 7.0. Начальный курс: Учебное пособие.–М.: «Нолидж», 1999.– 616 с.

37 Фаронов В.В. Турбо Паскаль 7.0. Практика программирования: Учебное пособие. - М.: «Нолидж», 1999.- 627 с.

38 Фурунжиев Р.И., Бабушкин Ф.М., Варавко В.В. Применение математических методов и ЭВМ: Практикум: Учеб. пособие для вузов. – Мн.: Высш. шк., 1988. – 191 с.

МАЗМҰНЫ


Кіріспе

3

Бақылау жұмыстарын жасау мен рәсімдеу ережесі

6

1 БӨЛІМ




  1. Пәннің мазмұны

8

  1. Жаттығу сабақтарының тапсырмалары мен бақылау

жұмыстары

13

1 - жаттығу жұмысы Сызықтық теңдеулер жүйесін шешу

14

2 - жаттығу жұмысы Сызықсыз теңдеулерді шешу

17

3 - жаттығу жұмысы Сызықсыз теңдеулер жүйелерін шешу

19

4 - жаттығу жұмысы Сандық тәсілдермен интегралдау

21

5 - жаттығу жұмысы Кәдімгі дифференциалдық теңдеулерді

шешудің сандық тәсілдері


25


6 - жаттығу жұмысы Дифференциалдық теңдеулер жүйесін

шешеу

28


7 - жаттығу жұмысы Функцияларды интерполяциялау және

аппроксимациялау


30


8 - жаттығу жұмысы Бірөлшемді тиімділеу

34

9 - жаттығу жұмысы Көпөлшемді тиімділеу

35

10 - жаттығу жұмысы Сызықтық программалау

37

11 - жаттығу жұмысы Тасымалдау есептері

47

2-БӨЛІМ




Қосымшалар




1-қосымша

54

2-қосымша

61

3-қосымша

74

4-қосымша

78

5-қосымша

82

Әдебиеттер

90

Мазмұны

94












Достарыңызбен бөлісу:
1   ...   137   138   139   140   141   142   143   144   145




©engime.org 2024
әкімшілігінің қараңыз

    Басты бет