Составить программу вычисления значения суммы бесконечного ряда с заданной точностью ε

@Тагир Манджиев · Регистрация: 08.05.2016

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

Составить программу вычисления значения суммы бесконечного ряда с заданной точностью . На печать вывести значение суммы и число членов ряда, вошедших в сумму. Помогите, пожалуйста, с программой Visual Basic.

Составить программу вычисления значения суммы бесконечного ряда с заданной точностью ε

@ili1 · 08.04.2018, 17:55

А в чём проблема?
1. судя по ряду, он знакочередующийся и кроме того 1 по общей
формуле не вычисляется. Тогда сделайте так.
2. S - сумма ряда, А - слагаемое ряда
3. Предварительно выполняете оператор S = 1
и кроме того инициализируете переменную x (икс)
(там у вас на рисунке опечатка - втрое слагаемое должно иметь знак минус)
4. значит далее идет цикл
5. но перед циклом вычисляется второе слагаемое А = -х²/2
и сумму S = S + A
6. (цикл). Вычисляете очередное слагаемое через предыдущее.
$https://www.cyberforum.ru/cgi-bin/latex.cgi?A=-A\frac{(2n+1)^2(2n+2)}{2n-1}x^2$
7. условие выхода из цикла
IF ABS(A) < 0.5E-3 THEN EXIT DO (если цикл DO)
8. далее оператор S = S + A
9. после цикла оператор PRINT "S ="; S

@Тагир Манджиев · 12.04.2018, 10:48 **[ТС]**

ili1, ili1, не могу понять, как адаптировать к Visual Basic 6.0.

@ili1 · 12.04.2018, 11:25

Тагир Манджиев
программа работает (проверено)

Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
Option Explicit
Dim S#, A#, x#, i&, n&
 
Private Sub Command1_Click()
    Const e = 0.0005
    S = 1
    x = Val(Text1.Text)
    A = -x ^ 2 / 2
    S = S + A
    n = 1
    
    Do
        n = n + 1
        A = -A / ((2 * n - 1) * (2 * n + 2)) * x ^ 2
        S = S + A
    Loop Until Abs(A) < e
    
    Print "S ="; S
End Sub

Новые блоги и статьи Все статьи Все блоги /
Загрузка PNG-файла с альфа-каналом с помощью библиотеки SDL3_image на Android 8Observer8 27.01.2026 Содержание блога SDL3_image - это библиотека для загрузки и работы с изображениями. Эта пошаговая инструкция покажет, как загрузить и вывести на экран смартфона картинку с альфа-каналом, то есть с. . .	влияние грибов на сукцессию anaschu 26.01.2026 Бифуркационные изменения массы гриба происходят тогда, когда мы уменьшаем массу компоста в 10 раз, а скорость прироста биомассы уменьшаем в три раза. Скорость прироста биомассы может уменьшаться за. . .	Воспроизведение звукового файла с помощью SDL3_mixer при касании экрана Android 8Observer8 26.01.2026 Содержание блога SDL3_mixer - это библиотека я для воспроизведения аудио. В отличие от инструкции по добавлению текста код по проигрыванию звука уже содержится в шаблоне примера. Нужно только. . .	Установка Android SDK, NDK, JDK, CMake и т.д. 8Observer8 25.01.2026 Содержание блога Перейдите по ссылке: https:/ / developer. android. com/ studio и в самом низу страницы кликните по архиву "commandlinetools-win-xxxxxx_latest. zip" Извлеките архив и вы увидите. . .
Вывод текста со шрифтом TTF на Android с помощью библиотеки SDL3_ttf 8Observer8 25.01.2026 Содержание блога Если у вас не установлены Android SDK, NDK, JDK, и т. д. то сделайте это по следующей инструкции: Установка Android SDK, NDK, JDK, CMake и т. д. Сборка примера Скачайте. . .	Использование SDL3-callbacks вместо функции main() на Android, Desktop и WebAssembly 8Observer8 24.01.2026 Содержание блога Если вы откроете примеры для начинающих на официальном репозитории SDL3 в папке: examples, то вы увидите, что все примеры используют следующие четыре обязательные функции, а. . .	моя боль iceja 24.01.2026 Выложила интерполяцию кубическими сплайнами www. iceja. net REST сервисы временно не работают, только через Web. Написала за 56 рабочих часов этот сайт с нуля. При помощи perplexity. ai PRO , при. . .	Модель сукцессии микоризы anaschu 24.01.2026 Решили писать научную статью с неким РОманом

@Тагир Манджиев 6 / 6 / 0 Регистрация: 08.05.2016 Сообщений: 144

	Составить программу вычисления значения суммы бесконечного ряда с заданной точностью ε 08.04.2018, 12:21. Показов 5180. Ответов 3 Метки нет (Все метки) Составить программу вычисления значения суммы бесконечного ряда с заданной точностью . На печать вывести значение суммы и число членов ряда, вошедших в сумму. Помогите, пожалуйста, с программой Visual Basic. 0

@ili1 Заблокирован
	08.04.2018, 17:55
	А в чём проблема? 1. судя по ряду, он знакочередующийся и кроме того 1 по общей формуле не вычисляется. Тогда сделайте так. 2. S - сумма ряда, А - слагаемое ряда 3. Предварительно выполняете оператор S = 1 и кроме того инициализируете переменную x (икс) (там у вас на рисунке опечатка - втрое слагаемое должно иметь знак минус) 4. значит далее идет цикл 5. но перед циклом вычисляется второе слагаемое А = -х²/2 и сумму S = S + A 6. (цикл). Вычисляете очередное слагаемое через предыдущее. $https://www.cyberforum.ru/cgi-bin/latex.cgi?A=-A\frac{(2n+1)^2(2n+2)}{2n-1}x^2$ 7. условие выхода из цикла IF ABS(A) < 0.5E-3 THEN EXIT DO (если цикл DO) 8. далее оператор S = S + A 9. после цикла оператор PRINT "S ="; S 0

@Тагир Манджиев 6 / 6 / 0 Регистрация: 08.05.2016 Сообщений: 144
	12.04.2018, 10:48 [ТС]
	ili1, ili1, не могу понять, как адаптировать к Visual Basic 6.0. 0

Составить программу вычисления значения суммы бесконечного ряда с заданной точностью ε

Решение