Вычислить сумму индексов положительных элементов массива С(9) которые формируются по правилу: C(i)=Sin(C(i-1) + 2) где С(1)=13 - VB
Формулировка задачи:
Составить блок-схему.
Буду признательно.
Решение задачи: «Вычислить сумму индексов положительных элементов массива С(9) которые формируются по правилу: C(i)=Sin(C(i-1) + 2) где С(1)=13»
textual
Листинг программы
- Private Sub Command1_Click()
- 'Вычислить сумму индексов положительных элементов массива С(9)
- 'которые формируются по правилу: C(i)=Sin(C(i-1) + 2) где С(1)=13
- Dim C(1 To 9), i As Integer, Sum As Integer
- C(1) = 13
- Sum = 1
- For i = 2 To 9
- C(i) = Sin(C(i - 1) + 2)
- If C(i) >= 0 Then Sum = Sum + i
- Next i
- MsgBox Sum
- End Sub
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д
