Реферат: Пояснительная записка к курсовой работе

Writeln ('y:=exp(ln(1-2*x+sqr(x))/5)/1-x методом Симпсона');

Writeln (F,'y:=exp(ln(1-2*x+sqr(x))/5)/1-x методом Симпсона');

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

Readln (a,b,N);

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

x1:=b;xn:=a;y1:=exp(ln(1-2*x1+sqr(x1))/5)/1-x1;

yn:=exp(ln(1-2*xn+sqr(xn))/5)/1-xn;y:=0;x:=b+h;

Repeat y:=exp(ln(1-2*x+sqr(x))/5)/1-x;x:=x+2*h Until (x>=(a-h));

I:=(h/3)*(y1+(y*y)+(2*y*y)+yn);

Writeln ('I= ',I:3:3);

Writeln (F,'I= ',I:3:3);

writeln ('Разработал студент гр.Тмду-21 Швецов В.В.');

writeln (F,'Разработал студент гр.Тмду-21 Швецов В.В.');

Close (F);

Readkey;

end.

Алгоритм программы

Машинный счет

Вычисление определенного интеграла функции

y:=exp(ln(1-2*x+sqr(x))/5)/1-x методом Симпсона

I= -0,466.

Разработал студент гр.Тмду-21 Швецов В.В.

Вывод: результаты машинного и ручного счета разошлись на 1,5%, следовательно программа выполнена верно.

Задание №5

Составить алгоритм и программу вычисления наибольшего и наименьшего значений функции на интервале [a,b]=[3,6]

Ручной счет: