Студопедия

КАТЕГОРИИ:


Архитектура-(3434)Астрономия-(809)Биология-(7483)Биотехнологии-(1457)Военное дело-(14632)Высокие технологии-(1363)География-(913)Геология-(1438)Государство-(451)Демография-(1065)Дом-(47672)Журналистика и СМИ-(912)Изобретательство-(14524)Иностранные языки-(4268)Информатика-(17799)Искусство-(1338)История-(13644)Компьютеры-(11121)Косметика-(55)Кулинария-(373)Культура-(8427)Лингвистика-(374)Литература-(1642)Маркетинг-(23702)Математика-(16968)Машиностроение-(1700)Медицина-(12668)Менеджмент-(24684)Механика-(15423)Науковедение-(506)Образование-(11852)Охрана труда-(3308)Педагогика-(5571)Полиграфия-(1312)Политика-(7869)Право-(5454)Приборостроение-(1369)Программирование-(2801)Производство-(97182)Промышленность-(8706)Психология-(18388)Религия-(3217)Связь-(10668)Сельское хозяйство-(299)Социология-(6455)Спорт-(42831)Строительство-(4793)Торговля-(5050)Транспорт-(2929)Туризм-(1568)Физика-(3942)Философия-(17015)Финансы-(26596)Химия-(22929)Экология-(12095)Экономика-(9961)Электроника-(8441)Электротехника-(4623)Энергетика-(12629)Юриспруденция-(1492)Ядерная техника-(1748)

Методом НЬЮТОНА




Методом Ньютона

Алгоритм решения нелинейного уравнения

10) Печатать «Название и номер контрольной работы»

20) Печатать «Дата, ФИО студента»

30) Ввести числовое значение номера группы G =?

40) Ввести числовое значение номера по списку в журнале S =?

50) Ввести числовое значение заданной погрешности вычислений Е =?

60) Ввести числовое значение i = 0

70) Ввести числовое значение xi =?

80) Присвоить индексу очередное числовое значение i:= i +1

90) Вычислить очередное приближение значения корня

xi = xi-1 - f (xi-1)/ f` (xi-1)

100) Проверить точность решения: | xi -xi-1 | < E

110) Принять решение:

если | xi -xi-1 | < E, то перейти к строке 120,

в ином случае, когда | xi -xi-1 | > E, то есть погрешность велика,

следует вернуться к строке 80

120) Вывести на экран найденное с требуемой погрешностью значение корня «x*» ≈ xi

130) Завершить работу программы

 


блок-схема Алгоритма решения нелинейного уравнения

                           
   
 
 
 
   
INPUT “ хохо
 
   
IF ABS(xi -xi-1) < E THEN x*= xi
 
   
ELSE GOTO 80
 
   
ENDIF
 
   
END

 

 

 

Цикл «ДО»

10 INPUT "a=",a

20 INPUT "b=",b

  Цикл «ДО»
30 i=0

40 REPEAT

50 i=i+1

60 z=(a+b)/i

70 UNTIL ABS(z)<0.1

80 PRINT "z=",z

90 PRINT "i=",i

100 END

 

Операции цикла «ДО» с комментариями

10 INPUT "a=",a Ввод числового значения «а»
20 INPUT "b=",b Ввод числового значения «b»
30 i=0 Обнуление переменной «i»
40 REPEAT Вход в цикл «ДО»
50 i=i+1 Тело цикла «ДО»
60 z=(a+b)/i
70 UNTIL ABS(z)<0.1 Выход и условие выхода из цикла «ДО»
80 PRINT "z=",z Печать значения "z"
90 PRINT "i=",i Печать значения "i"
100 END Конец программы

Цикл «ПОКА»

10 INPUT "a=",a

20 INPUT "b=",b

30 i=0

    Цикл «ПОКА»
40 z=a+b

50 WHILE ABS(z)>0.1

60 i=i+1

70 z=(a+b)/i

80 ENDWHILE

90 PRINT "z=",z

100 PRINT "i=",i

110 END

 

Операции цикла «ПОКА» с комментариями

 

10 INPUT "a=",a Ввод числового значения «а»
20 INPUT "b=",b Ввод числового значения «b»
30 i=0 Обнуление переменной «i»
40 z=a+b Вычисление начального значения функции «z»
50 WHILE ABS(z)>0.1 Вход в цикл «ПОКА»
60 i=i+1 Тело цикла«ПОКА»
70 z=(a+b)/i
80 ENDWHILE Выход и условие выхода из цикла «ПОКА»
90 PRINT "z=",z Печать значения "z"
100 PRINT "i=",i Печать значения "i"
110 END Конец программы

 





Поделиться с друзьями:


Дата добавления: 2014-01-06; Просмотров: 190; Нарушение авторских прав?; Мы поможем в написании вашей работы!


Нам важно ваше мнение! Был ли полезен опубликованный материал? Да | Нет



studopedia.su - Студопедия (2013 - 2024) год. Все материалы представленные на сайте исключительно с целью ознакомления читателями и не преследуют коммерческих целей или нарушение авторских прав! Последнее добавление




Генерация страницы за: 0.01 сек.