Оператор цикла со счётчиком - VB

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

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

всем привет) помогите разобраться... дана дробь: (x+2x^2)/sinx Она должна быть равна 3660 при условие x=30,n=1 Получается дальше нужно сложить эту дробь со следующей ((x+2x^2)/sinx)+(x+2x^2+3x^3)/sin2x и так далее общая формула получается (n+1)x^(n+1) и всё это делённое на sin(nx) Вот когда я так делаю...получается что он результат на 30 прибавляет( Не знаю,что можно сделать,чтобы он так не делал(
это вот мой вариант...но только прибавляет 30((
никто не может помочь? пожалуйста...очень нужно

Решение задачи: «Оператор цикла со счётчиком»

textual
Листинг программы
Private Sub Command1_Click()
Dim x As Single
Dim n As Single
Pi = 4 * Atn(1)
 
'x = Val(InputBox("Ââåäèòå x", "Ââîä Г¤Г*Г*Г*ûõ"))
'n = Val(InputBox("Ââåäèòå n", "Ââîä Г¤Г*Г*Г*ûõ"))
x = 30
n = 9
sum=0
For i = 1 To n
    s = 0
    For j = 1 To i + 1
        s = s + j * x ^ j
    Next
    s = s / (Sin(i * x * Pi / 180))
    sum = sum+s
    Print "S(" & i & ") = " & s
Next
Print "Сумма  = " & sum
End Sub

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


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

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

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