3
Министерство образования Российской Федерации
Тульский государственный университет
Кафедра "Инструментальные и метрологические системы"
ИНФОРМАТИКА
ПРОГРАММНО-МЕТОДИЧЕСКИЙ КОМПЛЕКС
"Вычисление определенного интеграла
методом трапеций"
Выполнил:
студент гр.621721 /Я.И. Зыбина/
Тула 2003
Содержание
Приложение 1
Приложение 2
REM Задать уравнение в виде fny(x)=0
DEF fny (x) = (1 / SQR (2 * 3.1415)) * EXP (-x * x / 2)
REM Очистить экран
CLS
REM Вывести назначение программы
PRINT "========================================"
PRINT "¦ Программа вычисления определенного интеграла ¦"
PRINT "¦ методом трапеций ¦"
PRINT "--------------------------------------------------------------------"
PRINT "¦ Курсовая работа по дисциплине 'ИНФОРМАТИКА' ¦"
INPUT " Начальное значение интервала для расчета значений а=",a
INPUT " Конечное значение интервала для расчета значений b=", b
h = (b - a)/n
PRINT "------------------------------------"
PRINT "| x | | y(x) |"
FOR x = a TO b STEP h
PRINT USING " | ##. ### | " ; x; FNy (x)
NEXT x
e = 1
INPUT " введите число разбиений n= '', n
I1 = 0
I2=0
f1=FNy(x)
f2 = FNy (x+h)
IF x <> a THEN I1 =I1+ (f1 + f2) * h /2
f1 = f2
e = (ABS (I2 - I1)) * 100 / I
WEND
PRINT USING “определённый интеграл = ##. ###### ” ; I1
PRINT " Таблица значений исследуемой функции"
PRINT " ====================== "
PRINT " ¦ n/n ¦Аргумент¦ Значение ¦ "
REM Закончить работу программы
STOP
END
Приложение 3
¦ Программа вычисления корней уравнения ¦
¦ методом простых итераций ¦
---------------------------------------------------------------------
¦ Курсовая работа по дисциплине 'ИНФОРМАТИКА' ¦
=========================================
Таблица значений исследуемой функции
======================
¦ n/n ¦Аргумент¦ Значение ¦
¦ 1 ¦ 0.000 ¦ 0 ¦
¦ 2 ¦ 0.500 ¦ 3.5299 ¦
¦ 3 ¦ 1.000 ¦ 1.2131 ¦
¦ 4 ¦ 1.500 ¦ 0.4328 ¦
¦ 5 ¦ 2.000 ¦ 0.1353 ¦
¦ 6 ¦ 2.500 ¦ 0.0351 ¦
¦ 7 ¦ 3.000 ¦ 0.0074 ¦
¦ 8 ¦ 3.500 ¦ 0.0012 ¦
¦ 9 ¦ 4.000 ¦ 0.16 · 10-3 ¦
¦ 10 ¦ 4.500 ¦ 0.18 · 10-4 ¦
¦ 11 ¦ 5.000 ¦ 0.149 · 10-5 ¦
¦ 12 ¦ 5.500 ¦ 0.98 · 10-7 ¦
¦ 13 ¦ 6.000 ¦ 0.5 · 10-8 ¦
¦ 14 ¦ 6.500 ¦ 0.206 · 10-9 ¦
¦ 15 ¦ 7.000 ¦ 0.654 · 10-12 ¦
¦ 16 ¦ 7.500 ¦ 0.162 · 10-12 ¦
¦ 17 ¦ 8.000 ¦ 0.317 · 10-14 ¦
¦ 18 ¦ 8.500 ¦ 0.482 · 10-16 ¦
¦ 19 ¦ 9.000 ¦ 0.573 · 10-18 ¦
¦ 20 ¦ 9.500 ¦ 0.532 · 10-20 ¦
Лист регистрации изменений
Номера листов (страниц)
Всего листов (страниц) в докум.
№
документа
Входящий № сопроводительного докум. и дата
Подп.
Дата
Изм
измененных
Замененных
новых
Аннулированных