Приближенное вычисление определенных интегралов, которые не берутся через элементарные функции
Категория реферата: Рефераты по математике
Теги реферата: реферати, сочинение ревизор
Добавил(а) на сайт: Mosjakov.
Предыдущая страница реферата | 1 2 3 4 5 6 7 8 9 | Следующая страница реферата
[pic] [pic] (16).
При зростанні [pic] цей вираз зменьшується приблизно як [pic]; таким чином, формула Симпсона дійсно більш вигідна, ніж попередні дві формули.
Додаток 1.
Текст программи для автоматичного обчислення інтегралів на мові програмування QBASIC:
'Тут описуються сталі e = 2.718281828459045# pi = 3.141592653589793#
'Тут задається від під інтегральної функції
DEF fny# (x#) = e(x# (2
DEF fncoef# (i#) = (i# MOD 2) * 2 + 2
DEF fnxi# (i#) = a# + i# * h#
DEF fnxis# (i#) = a# + i# * h# / 2
DEF fnxic# (i#) = a# + i# * h# + h# / 2
DEF fnxir# (i#) = a# + i# * h# + h# / 2
CLS
'Тут вводяться межі інтегрування та
'кількість проміжків
INPUT «Введіть нижню межу інтегрування » a#
INPUT «Введіть верхню межу інтегрування » b#
INPUT «Введіть кількість проміжків » n#
'Тут обчислюється крок
h# = (b# - a#) / n#
'Тут обчислюється наближене значення
'інтеграла за методом Сімпсона
integ# = 0
FOR i# = 1 TO ((2 * n#) - 1) integ# = integ# + fncoef#(i#) * fny#(fnxis#(i#))
NEXT
integ# = integ# + fny#(a#) + fny#(b#)
integ# = integ# * (h# / 6)
PRINT "Simpson = "; integ#
'Тут обчислюється наближене значення
'інтеграла за методом трапецій
integ# = 0
FOR i# = 1 TO (n# - 1) integ# = integ# + fny#(fnxi#(i#))
NEXT
integ# = integ# + (fny#(a#) + fny#(b#)) / 2
integ# = integ# * h#
PRINT (Trapeze = (; integ#
'Тут обчислюється наближене значення
'інтеграла за методом лівих прямокутників
integ# = 0
FOR i# = 0 TO (n# - 1) integ# = integ# + fny#(fnxi#(i#))
NEXT
integ# = integ# * h#
PRINT "L Rectangle = "; integ#
'Тут обчислюється наближене значення
'інтеграла за методом центральних прямокутників
integ# = 0
FOR i# = 0 TO n# integ# = integ# + fny#(fnxic#(i#))
NEXT
integ# = integ# * h#
PRINT "C Rectangle = "; integ#
'Тут обчислюється наближене значення
'інтеграла за методом правих прямокутників
integ# = 0
FOR i# = 1 TO n#
integ# = integ# + fny#(fnxir#(i#))
NEXT
integ# = integ# * h#
PRINT "R Rectangle = "; integ#
Додаток 2.
Далі подані результати роботи програми, яка викладена в додатку 1.
1) [pic]в межах від 0 до [pic] n=1000
Метод Сімпсона -8.742278155181581D-08
Метод трапецій -8.742270585611512D-08
Метод лівих прямокутників 3.141505318306509D-03
Метод центральних прямокутників -3.14167628761223D-03
Метод правих прямокутників -6.283265152840917D-03
2) [pic]в межах від 0 до [pic] n=1000
Рекомендуем скачать другие рефераты по теме: собрание сочинений, реферат на тему производство.
Предыдущая страница реферата | 1 2 3 4 5 6 7 8 9 | Следующая страница реферата