Решить уравнение методом Ньютона-Рафсона

@MrPerfect · Регистрация: 19.12.2013

Студворк — интернет-сервис помощи студентам

Решить уравнение методом Ньютона-Рафсона (tg x+1)(sin x-1)=0
Пробовал сам, но что-то неправильно

QBasic/QuickBASIC
1
2
3
4
5
6
7
8
9
10
11
PRINT "N-R"
X = 0: X1 = 3.14: H = 0.000001: Z = 0.00001
10 F1 = 1 / (COS(X)) ^ 2 * (SIN(X) - 1) + (TAN(X) + 1) * COS(X)
IF ABS(F1) > 1 THEN 20
IF X > X1 THEN PRINT "NA DANNOM INTERVALE NE RESHAETSA": GOTO 40
X = X + H: GOTO 10
20 F = (TAN(X) + 1) * (SIN(X) - 1)
IF ABS(F) < Z THEN PRINT "OTVET:", "X="; X, "F="; F: GOTO 40
IF X > X1 THEN PRINT "DANNIM METODOM NE REHSAETSA": GOTO 40
X = X - (F / F1): GOTO 10
40 END

@gehh · 06.04.2014, 16:58

Что сразу бросается в глаза, так это то, что вы не выделяет метки двоеточием.
Ведь от нумерации строк вы отказались и теперь это метки. Вот и ошибка.
Удачи вам!

@Good-Morning · 06.04.2014, 17:41

Сообщение от gehh

и теперь это метки

C чего же они стали метками? Проверял - у меня такая нумерация работает.

@gehh · 07.04.2014, 11:35

Хочу принести вам свои извинения.
У меня тоже оператор GOTO не требует,
чтобы метка выделялась двоеточим.
Я потрясен! Ведь с QBasic я знаком много лет.
Спасибо вам!

@Good-Morning · 07.04.2014, 16:29

В связи с тем, что, как оказалось, метки и нумерация строк здесь не при чем, MrPerfect, изложите здесь метод Ньютона-Рафсона, там подумаем.

Новые блоги и статьи Все статьи Все блоги /
Установка Qt Creator для C и C++: ставим среду, CMake и MinGW без фреймворка Qt 8Observer8 05.04.2026 Среду разработки Qt Creator можно установить без фреймворка Qt. Есть отдельный репозиторий для этой среды: https:/ / github. com/ qt-creator/ qt-creator, где можно скачать установщик, на вкладке Releases:. . .	AkelPad-скрипты, структуры, и немного лирики.. testuser2 05.04.2026 Такая программа, как AkelPad существует уже давно, и также давно существуют скрипты под нее. Тем не менее, прога живет, периодически что-то не спеша дополняется, улучшается. Что меня в первую очередь. . .	Отображение реквизитов в документе по условию и контроль их заполнения Maks 04.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеСпецтехники", разработанного в конфигурации КА2. Данный документ берёт данные из другого нетипового документа. . .	Фото всей Земли с борта корабля Orion миссии Artemis II kumehtar 04.04.2026 Это первое подобное фото сделанное человеком за 50 лет. Снимок называют новым вариантом легендарной фотографии «The Blue Marble» 1972 года, сделанной с борта корабля «Аполлон-17». Новое фото. . .
Вывод диалогового окна перед закрытием, если документ не проведён Maks 04.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: реализовать программный контроль на предмет проведения документа. . .	Программный контроль заполнения реквизитов табличной части документа Maks 02.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: 1. Реализовать контроль заполнения реквизита. . .	wmic не является внутренней или внешней командой Maks 02.04.2026 Решение: DISM / Online / Add-Capability / CapabilityName:WMIC~~~~ Отсюда: https:/ / winitpro. ru/ index. php/ 2025/ 02/ 14/ komanda-wmic-ne-naydena/	Программная установка даты и запрет ее изменения Maks 02.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: при создании документов установить период списания автоматически. . .

@gehh 159 / 104 / 124 Регистрация: 01.04.2014 Сообщений: 466 Записей в блоге: 7
	06.04.2014, 16:58
	Что сразу бросается в глаза, так это то, что вы не выделяет метки двоеточием. Ведь от нумерации строк вы отказались и теперь это метки. Вот и ошибка. Удачи вам! 0

@gehh 159 / 104 / 124 Регистрация: 01.04.2014 Сообщений: 466 Записей в блоге: 7
	07.04.2014, 11:35
	Хочу принести вам свои извинения. У меня тоже оператор GOTO не требует, чтобы метка выделялась двоеточим. Я потрясен! Ведь с QBasic я знаком много лет. Спасибо вам! 0

@Good-Morning 1045 / 315 / 74 Регистрация: 13.07.2013 Сообщений: 1,270
	07.04.2014, 16:29
	В связи с тем, что, как оказалось, метки и нумерация строк здесь не при чем, MrPerfect, изложите здесь метод Ньютона-Рафсона, там подумаем. 0