рефераты конспекты курсовые дипломные лекции шпоры

Реферат Курсовая Конспект

PROGRAM U6

PROGRAM U6 - раздел Философия, Основы информационных технологий и программирование Print*,'численное Интегрировaние Методом Трaпеций' Print*,'введите Н...

PRINT*,'ЧИСЛЕННОЕ ИНТЕГРИРОВAНИЕ МЕТОДОМ ТРAПЕЦИЙ'

PRINT*,'ВВЕДИТЕ НИЖНИЙ И ВЕРХНИЙ ПРЕДЕЛ'

PRINT*,'A ТAКЖЕ РAСЧЁТНОЕ КОЛИЧЕСТВО ОРДИНAТ'

READ(5,*) A,B,N

H=(B-A)/(N-1)

S=0

DO 5 X=A,1.001*B,H

S=S+F(X)

5 CONTINUE

QN=(S-(F(A)+F(B))/2.)*H

DO K=6,7

WRITE (K,10) A,B,N

10 FORMAT (2X,'ВЫЧИСЛЕНИЕ ОПРЕДЕЛЁННОГО ИНТЕГРAЛA',/

*5X,'(МЕТОД ТРAПЕЦИЙ)'/

*5X,17('-'),'ИСХОДНЫЕ ДAННЫЕ',17('-'),//

*5X,'НИЖНИЙ ПРЕДЕЛ A=',F7.3,/

*5X,'ВЕРХНИЙ ПРЕДЕЛ B=',F7.3,/

*5X,'РAСЧЁТНОЕ КОЛИЧЕСТВО ОРДИНAТ N=',I2)

WRITE (K,20) QN

20 FORMAT (/5X,16('-'),'РЕЗУЛЬТАТЫ РАСЧЁТА',16('-'),//

*5X,'ЧИСЛЕННОЕ ЗНАЧЕНИЕ ИНТЕГРАЛА РАВНО',F12.6,/65('-'))

END DO

END

 

Результаты выполнения программы имеют такой вид:

Вычисление определенного интеграла (метод трапеций)

 

------------- ИСХОДНЫЕ ДАННЫЕ--------------------

НИЖНИЙ ПРЕДЕЛ А = 0.100

ВЕРХНИЙ ПРЕДЕЛ В = 0.500

РАСЧЕТНОЕ КОЛИЧЕСМТВО ОРДИНАТ N =21.

 

--------------РЕЗУЛЬТАТЫ РАСЧЕТА------------------

 

 

ЧИСЛЕННОЕ ЗНАЧЕНИЕ ИНТЕГРАЛА РАВНО 0,396877

 

 

Таблица 1

 

№ варіан-ту Інтеграл № варіан-ту Інтеграл № варіан-ту Інтеграл

 

Наименование букв греческого алфавита

 

Α Β Γ Δ Ε Ζ Η Θ Ι Κ Λ Μ Ν Ξ Ο Π Ρ Σ Τ Υ Φ Χ Ψ Ω

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24

 

ά β γ δ έ ζ ή ς ι κ λ μ ν ξ ο π ρ σ τ υ φ χ ψ ω

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24

 

 

1 — альфа, 2 — бета, 3 — гамма, 4 — дельта, 5—эпсилон, 6— дзета,

7 — эта, 8—тэта, 9 —йота, 10 — каппа, 11— ламбда, 12 — мю, 13 —ню, 14— кси,15—омикрон,16—пи,17—ро,18— сигма, 19 — тау, 20 — эпсилон, 21 — фи, 22хи, 23 — пси, 24 — омега

 

 

– Конец работы –

Эта тема принадлежит разделу:

Основы информационных технологий и программирование

Министерство образования и науки... молодежи и спорта Украины... Национальный университет кораблестроения Херсонский филиал...

Если Вам нужно дополнительный материал на эту тему, или Вы не нашли то, что искали, рекомендуем воспользоваться поиском по нашей базе работ: PROGRAM U6

Что будем делать с полученным материалом:

Если этот материал оказался полезным ля Вас, Вы можете сохранить его на свою страничку в социальных сетях:

Все темы данного раздела:

Методические указания
для самостоятельной работы студентов   при изучении дисциплины «Основы информационных технологий и программирование» (численные мето

I. Некоторые сведения о приближенных вычислениях
1.1.Общие сведения о погрешностях В большинстве случаев технические вычисления производятся с при­ближенными числами. Это происходит потому, что исходные данные для чис­ленного определения

О т д е л е н и е к о р н е й
Пусть дано уравнение f(x)=0, в котором функция f(x) определена и непрерывна в некотором конечном или бесконечном интервале а<x<в. Всякое значение z , обращающее функцию f(x) в нуль, т.е. тако

П о л о в и н н о г о д е л е н и я .
Пусть дано уравнение f (x)= 0 , ( 1 ) , один из корней которого отделен , т.е. найден отрезок ( а , в ) , на концах которого значения функции f(x) имеют разные знаки . Для нахождения корня

Р е ш е н и е н е л и н е й н ы х у р а в н е н и й м е т о д о м х о р д
  Метод хорд является более быстрым способом нахождения корня уравнения f (x)=0 , нежели метод половинного деления (Рис. 1). Пусть функция f(x) непрерывна на отрезке ( а , в

К а с а т е л ь н ы х
  Метод касательных , называемый также методом Ньютона, широко используется при построении итерационных алгоритмов. Его попу-лярность объясняется быстрой сходимостью при хорошем начал

П р о с т ы х и т е р а ц и й
  Этот метод решения уравнения f(х) = 0 состоит в замене исходного уравнения эквивалентным ему уравнением х = j(х) и построении последовательности хn+1 = j (хn)

Интерполяция зависимостей
Одной из важнейших задач процесса математического моделирования является вычисление значений функций, входящих в математическое описание модели. Для сложных моделей подобные вычисления могут б

Общие замечания.
Если функция непрерывна на отрезке

Вычисление определенных интегралов методом Симпсона.
Для применения метода Симпсона промежуток интегрирования делится равноотстоящими ординатами на четное число частей.

CALL IDRES(X1,X2,EPS,X,K)
0

CALL KHORD (X1,X2,EPS,X,K)
CALL IDRES(X1,X2,EPS,X,K) 10 STOP END   SUBROUTINE KHORD(A,B,EPS,X,K) * РЕШЕНИЕ НЕЛИНЕЙНЫХ УРАВНЕНИЙ * МЕТОДОМ ХОРД PRINT*,'ВВЕДИ

CALL NEWTO (X1,X2,EPS,X,K)
CALL IDRES(X1,X2,EPS,X,K) 10 STOP END   SUBROUTINE NEWTO (A,B,EPS,X,K) * РЕШЕНИЕ НЕЛИНЕЙНЫХ УРАВНЕНИЙ * МЕТОДОМ НЬЮТОНA PRINT*,'В

CALL NEWTO (X1,X2,EPS,X,K)
CALL IDRES(X1,X2,EPS,X,K) 10 STOP END   SUBROUTINE PRITE (A,B,EPS,X,K) * РЕШЕНИЕ НЕЛИНЕЙНЫХ УРАВНЕНИЙ * МЕТОДОМ ПРОСТЫХ ИТЕРАЦИЙ

Хотите получать на электронную почту самые свежие новости?
Education Insider Sample
Подпишитесь на Нашу рассылку
Наша политика приватности обеспечивает 100% безопасность и анонимность Ваших E-Mail
Реклама
Соответствующий теме материал
  • Похожее
  • Популярное
  • Облако тегов
  • Здесь
  • Временно
  • Пусто
Теги