Подсчитать сумму ряда с заданной точностью

05.10.2014, 17:17. **Показов** 1501. **Ответов** 2

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

Доброго времени суток
Пожалуйста, объясните, как мне записать это уравнение в Basic?

$https://www.cyberforum.ru/cgi-bin/latex.cgi?\chi -\frac{{\chi }^{2}}{2}+\frac{{\chi }^{3}}{3}-\frac{{\chi }^{4}}{4} ... -1<\chi \leq 1 \epsilon ={10}^{-5}$

буду очень признателен !

Добавлено через 8 минут
Мне нужно решить это уравнение используя оператор "function" и рода "Do loop".

@Улугбек · 07.11.2014, 00:20

Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
Sub Uravnenie()
Dim x As Double, y As Double, ch As Integer
ch = 0
For x = -1 To 1 Step 0.09
    If x > -1 And x <= 1 Then
        ch = ch + 1
        If ch Mod 2 = 0 Then
            y = y - ((x ^ ch) / ch)
        Else
            y = y + ((x ^ ch) / ch)
        End If
    End If
    Debug.Print y
Next x
End Sub

@Alex77755 · 07.11.2014, 11:17

Улугбек,
Не путай бедных студентов!
И почитай что-нибудь про сумму ряда
В вопросе и подсказка есть

используя оператор "function" и рода "Do loop".

Нухно вынести вычисление в отдельную функцию
И в ней в цикле вичислять все элементы до заданной точности

Visual Basic
1
For x = -1 To 1 Step 0.09

Откуда здесь появился шаг? В условии его нет
В соседней ветке варинет решения тоже не верный

Добавлено через 45 минут
Функция будет как-то так:

Visual Basic
1
2
3
4
5
6
7
8
9
10
Function Sum(a, E) As Double
        Dim Y, SN, N
        If a = 0 Then Exit Function
           Do
                   N = N + 1
                    Y = (-1) ^ (N + 1) * a ^ N / N
                    SN = SN + Y
           Loop While Abs(Y) > E '
      Sum = SN
End Function

Новые блоги и статьи Все статьи Все блоги /
Валидация и контроль данных табличной части документа перед записью Maks 22.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа, разработанного в КА2. Задача: контроль и валидация данных табличной части документа перед записью с учетом регламента компании. . .	Отчёт о затраченных материалах за определенный период с макетом печатной формы Maks 21.04.2026 Отчёт из решения ниже размещён в конфигурации КА2. Задача: разработка отчёта по затраченным материалам за определённый период, с возможностью вывода печатной формы отчёта с шапкой и подвалом. В. . .	Отчёт о спецтехнике находящейся в ремонте Maks 20.04.2026 Отчёт из решения ниже размещен в конфигурации КА2. Задача: отобразить спецтехнику, которая на данный момент находится в ремонте. Есть нетиповой документ "Заявка на ремонт спецтехники" который. . .	Памятка для бота и "визитка" для читателей "Semantic Universe Layer (Слой семантической вселенной)" Hrethgir 19.04.2026 Сгенерировано для краткого описания по случаю сборки и компиляции скелета серверного приложения. И пусть после этого скажут, что статьи сгенерированные AI - туфта и не интересно. И это не реклама -. . .
Запрет удаления строк ТЧ документа при определённом условии Maks 19.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "Аккумуляторы", разработанного в конфигурации КА2. У данного документа есть ТЧ, в которой в зависимости от прав доступа. . .	Модель заражения группы наркоманов alhaos 17.04.2026 Условия задачи сформулированы тут Суть: - Группа наркоманов из 10 человек. - Только один инфицирован ВИЧ. - Колются одной иглой. - Колются раз в день. - Колются последовательно через. . .	Мысли в слух. Про "навсегда". kumehtar 16.04.2026 Подумалось тут, что наверное очень глупо использовать во всяких своих установках понятие "навсегда". Это очень сильное понятие, и я только начинаю понимать край его смысла, не смотря на то что давно. . .	My Business CRM MaGz GoLd 16.04.2026 Всем привет, недавно возникла потребность создать CRM, для личных нужд. Собственно программа предоставляет из себя базу данных клиентов, в которой можно фиксировать звонки, стадии сделки, а также. . .

Mjasnoi

	Подсчитать сумму ряда с заданной точностью 05.10.2014, 17:17. Показов 1501. Ответов 2 Метки нет (Все метки) Доброго времени суток Пожалуйста, объясните, как мне записать это уравнение в Basic? $https://www.cyberforum.ru/cgi-bin/latex.cgi?\chi -\frac{{\chi }^{2}}{2}+\frac{{\chi }^{3}}{3}-\frac{{\chi }^{4}}{4} ...<br /> <br /> <br /> -1<\chi \leq 1<br /> <br /> <br /> \epsilon ={10}^{-5}$ буду очень признателен ! Добавлено через 8 минут Мне нужно решить это уравнение используя оператор "function" и рода "Do loop".

Опции темы

Подсчитать сумму ряда с заданной точностью

Решение