|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
18.05.2020, 18:39 | #1 |
Новичок
Джуниор
Регистрация: 18.05.2020
Сообщений: 4
|
Cоставте программу нахождения суммы бесконечного ряда с заданной точностью на Turbo Basic
у меня получилось так,но почему то не работает.
Подправьте пожалуйста умные люди INPUT "X=" , X INPUT "E=" , E S=0 PI=3.14 FOR I=1 TO N STEP E N=I+E SUM=(X^I*COS(I)*(PI/3))/I SUM=S+SUM PRINT "S=" , SUM NEXT I END |
18.05.2020, 22:24 | #2 |
Старожил
Регистрация: 04.02.2011
Сообщений: 4,619
|
Эээх, товарисч...
N не определено, STEP E - это вообще БСК * Нужно задаться большим N (всё равно раньше вывалимся из цикла по условию), каждый раз запоминаить результат предыдущего и вычислять разность посдеднего расчёта и предыдущего. Если эта разность по абс. величине < e - всё, приплыли, получите результат. Если не докумекаешь, завтра накорябаю на Дельфи, перепрёшь на Бесик сам, бо я его забыл ещё в прошлом тысячелетии. ---------------------------------------- * БСК - Бред Сивой Кобылы |
19.05.2020, 09:03 | #3 |
Новичок
Джуниор
Регистрация: 18.05.2020
Сообщений: 4
|
input "x=" , x
input "e=" ,e s=0 i=1 pi=3.14 do s=sum i=i+e sum=s+(x^i*cos(i)*(pi/3))/i loop until abs (sum-s)<e print "s=",sum end Последний раз редактировалось Fayst85; 19.05.2020 в 10:03. Причина: привел к более верному виду по моему мнению |
19.05.2020, 09:04 | #4 |
Новичок
Джуниор
Регистрация: 18.05.2020
Сообщений: 4
|
Вот такое сегодня состряпал перековыряв инет,ошибку 6 показывает,переполнение.
Думаю надо что то подправить,может что лишнее написал. |
19.05.2020, 10:41 | #5 |
Старожил
Регистрация: 04.02.2011
Сообщений: 4,619
|
.....ть !
опять всё та же фигня : i=i+e - сложение зайцев с экскаваторами. s=sum, а sum не определена . Вот как это выглядит по уму. Логика ясна, а на Трубо Бесик сам перепрёшь. Вместо BREAK будет GOTO за пределы цикла. Код:
Последний раз редактировалось digitalis; 19.05.2020 в 10:52. |
19.05.2020, 11:19 | #6 |
Новичок
Джуниор
Регистрация: 18.05.2020
Сообщений: 4
|
изменил
вместо (sum-s) оставил просто s,вроде как показал вполне сносный результат
|
19.05.2020, 12:38 | #7 |
Старожил
Регистрация: 04.02.2011
Сообщений: 4,619
|
А в чём его "сносность" ? Если в том, что он хоть какой-то "результат" выдаёт- неважно, что неправильный - то трындец. Нет слов, одни выражения.
Тебе же показали нормальный код, точный результат - и не изменил ни строчки в своём опусе ! Желаю успеха. Но за i = i + e нужно прилюдно на площади сечь розгами. Такое впечатление, что тискаешь клавиши, даже минимально не вникая в смысл. Всё, я умываю руки. Глухой не тот, у кого ослаблен слух, а кто не желает слышать. Последний раз редактировалось digitalis; 19.05.2020 в 17:16. |
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Написать программу для нахождения суммы ряда с заданной точностью | Andrei.Ch | Общие вопросы C/C++ | 3 | 02.02.2018 18:14 |
Вычислить сумму бесконечного ряда с заданной точностью | Alex95 | Помощь студентам | 1 | 27.12.2015 08:10 |
Подсчет суммы бесконечного ряда с точностью Е. | dekuk | Помощь студентам | 21 | 24.09.2011 11:24 |
Составить графический алгоритм и программу для нахождения суммы ряда с заданной точностью | ginfix | Помощь студентам | 1 | 30.03.2011 23:39 |
нахождения суммы ряда с заданной точностью E | pinch000 | Общие вопросы C/C++ | 1 | 06.11.2009 13:03 |