Вычислить значение выражения P, включающего 10 членов - VB

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

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

помогите плиз)

Решение задачи: «Вычислить значение выражения P, включающего 10 членов»

textual
Листинг программы 
Option Explicit
Dim P As Single
Dim i As Integer
Private Sub Command1_Click()
 For i = 3 To 11   ' Ответ будет 483,308 , но это 9 членов а с 10-ю членами(For i = 3 To 12) ответ будет 625,315
   P = P + ((1 / i) - i) ^ 2
 Next i
Print Format(P, "0.000")
End Sub

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

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

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

11   голосов , оценка 4.091 из 5