Автор работы: Пользователь скрыл имя, 04 Июня 2012 в 22:12, дипломная работа
Актуальность работы заключается в том, что на сегодняшний день использование компьютерных технологий при обучении имеет большие перспективы так как происходит постепенная компьютеризация преподавания дисциплин.
Целью дипломной работы является выявление необходимости использования информационных технологий, а также выявление более удобного для обучения современного программного обеспечения решения определенных интегралов.
Введение……………………………………………………………………3
Глава 1. Решение определенных интегралов в системе Math Cad…5
1.1 Назначение и место системы MathCad……………………………..5
1.2 Примеры решения определенных интегралов в MathCad……...…6
Глава 2. Решение определенных интегралов в системе Maple……10
2.1 Общая характеристика системы Maple………………………………10
2.2 Примеры решения определенных интегралов в Maple…………..…11
Глава 3. Программа вычисления определенных интегралов на языке программирования Паскаль…………………………………...13
3.1 Вычисления интегралов с помощью программы «Интегрирование»…………………………………………………………..
3.2 Исходный код программы……………………………………………17
Заключение……………………………………………………………….20
Литература……………………………………..…………………………22
Пример 4. Вычислить интеграл
Пример
5. Вычислить интеграл где нижний
предел больше верхнего
3.2
Исходный код программы
Program Integrirovanie;
Uses Crt;
Var n,a,b, Integral:Real;
function Power(Base,Exponent:
Real): Real;
var
Tmp: Real;
begin
Power:=0;
if Int(Exponent/2)=Exponent/2 then
Base:=Abs(Base);
if Exponent=0 then
begin
Power:=1;
Exit
end;
if Base=0 then
begin
power:=0;
exit
end;
if Base>0 then
begin
Tmp:=Exp((Abs(Exponent))*Ln(
if Exponent>0 then
begin
power:=Tmp;
exit
end;
if Exponent<0 then
begin
power:=1/Tmp;
exit
end;
end;
if Base<0 then
begin
Tmp :=Exp((Abs(Exponent))*Ln(Abs(
if Exponent>0 then
begin
power:=-Tmp;
exit
end;
if Exponent<0 then
begin
power:=-1/Tmp;
exit
end;
end;
end;
Function Pervoobraznaya (st,t:Real):Real;
begin
Pervoobraznaya:= Power(t,st+1)/(st+1);
end;
begin
write ('Vvedite stepen n=');
readln(n);
write ('Vvedite predeli integrirovaniya a i b:');
readln(a,b);
If n<>-1 then
Integral:= Pervoobraznaya(n,b) - Pervoobraznaya(n,a) else
Integral:=ln(abs(b)) - ln(abs(a));
writeln ('Integral=' , Integral:8:2);
Readkey;
end.
Заключение
Рассмотрев решение интегралов в различных программах, мы пришли к выводу, что на сегодняшний день, лучшая программа для вычисления интегралов является MathCAD. (рис.2)
Рисунок–2
MathCAD дает пользователю возможность использовать знакомые по математическому анализу обозначения неопределенных интегралов.MathCAD с легкостью справляется с интегралами – пусть не со всеми, но с их значительной частью. MathCAD – это просто!
К
сожалению, программное обеспечение
для решения определенных интегралов
в России распространено еще слабо,
как и все программные продукты подобного
рода. Наверное, это оттого, что люди, живущие
в России, ещё не привыкли к тому, что решить
интегралы или решить систему дифференциальных
уравнений из пяти переменных шестого
порядка можно не только с помощью карандаша
и бумаги, но и с помощью компьютера. Зачем
человеку с высшим образованием, который
знает и может решить эту систему, решать
её на бумаге, когда можно переложить эту
рутинную работу на плечи мощных вычислительных
машин. Другое дело учащиеся учебных заведений.
Они, конечно же, решат эту систему, но
получив в ответе массу чисел и выражений,
не будут знать, где ответ и правильный
ли он. Потому что они не понимают смысла
того, что делают. Поэтому, компьютеры
в учебных заведениях, безусловно, нужны,
но только для студентов старших курсов.
А студентам младших курсов они нужны
лишь для того, что бы учится на них работать
и программировать, а использование готовых
программных продуктов возможно лишь
только при понимании задач и знания принципа
её решения.
Литература
Информация о работе Программа вычисления определенных интегралов на языке программирования Паскаль