Реферат: Пояснительная записка к курсовой работе
writeln (f,' Y=',y:5:5,' при X=',x:4:2);
if (y<=ymin) then begin ymin:=y; xmin:=x;end;
if (y>=ymax) then begin ymax:=y; xmax:=x;end;
x:=x+h;
end;writeln;
writeln('Ymax=',ymax:5:3,' при X=',xmax:4:2);
writeln(F,'Ymax=',ymax:5:3,' при X=',xmax:4:2);
writeln('Ymin=',ymin:5:3,' при X=',xmin:4:2);
writeln(F,'Ymin=',ymin:5:3,' при X=',xmin:4:2);
writeln ('Разработал студент гр.Тмду-21 Швецов В.В.');
writeln (F,'Разработал студент гр.Тмду-21 Швецов В.В.');
readln;
Close (F);
end.
Машинный счет
Вычисление наибольшего и наименьшего значения функции
y=arctan( ((2*x)/(1+x*x))/sqrt(1-sqr(((2*x)/(1+x*x)))) )-(3*Pi/2)
Введите число разбиений n= 4
Y=-4.06889 при X=3.00
Y=-4.19118 при X=3.75
Y=-4.27505 при X=4.50
Y=-4.33595 при X=5.25
Y=-4.38209 при X=6.00
Ymax=-4.069 при X=3.00
Ymin=-4.382 при X=6.00
Вывод: Результаты ручного и машинного счета совпадают, следовательно программа работает верно
Заключение.
Программы работают правильно, так как ручной и машинный счет совпадают. Можно сделать вывод, что курсовая работа выполнена правильно. Для каждого задания была составлена блок-схема, программа на языке TP7, представлены ручные и машинные расчеты.
Для задания №5 в ручных расчетах представлен график функции заданной функции.