Методом НЬЮТОНА
 | |||||||||||||
 | |||||||||||||
| |||||||||||||
| |||||||||||||
| |||||||||||||
| |||||||||||||
|
Цикл «ДО»
10 INPUT "a=",a
20 INPUT "b=",b
|
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
|
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 | Конец программы |
Дата добавления: 2015-08-21; просмотров: 434;