Дано выражение и нужно определить его значение с точностью до члена ряда - VB

Узнай цену своей работы

Формулировка задачи:

Дано выражение и нужно определить его значение с точностью до члена ряда, меньшего невнятного чего-то. Всё подробно в теме Помогите пожалуйста. Нежели разбирать мои записи, проще посмотреть на фото:

Решение задачи: «Дано выражение и нужно определить его значение с точностью до члена ряда»

textual
Листинг программы
Dim x!, y!, z!, i&, e!
x = Val(InputBox("x"))
e = Val(InputBox("e"))
y = 0: i = 1: z = x
Do While Abs(z) > e
 z = (-1) ^ i * x ^ (2 * i - 1) / (2 * i - 1)
 y = y - z
 i = i + 1
 DoEvents
Loop
 
MsgBox y

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

Оцени полезность:

15   голосов , оценка 4 из 5
Похожие ответы