Определить элементы массива по правилу - VB
Формулировка задачи:
Ввести Массив (b(1),.....,b(20))
Определить элементы массива (с(1),...c(20)) по правилу
Решение задачи: «Определить элементы массива по правилу»
textual
Листинг программы
- Private Sub Command1_Click()
- Const n = 20
- Dim b(1 To n) As Double
- Dim c(0 To n) As Double
- For i = 1 To n
- b(i) = Int(100 * Rnd)
- Next i
- c(0) = 0 'вспомогательный элемент
- For i = 1 To n
- c(i) = c(i - 1) + b(i) ^ i
- Print c(i)
- Next i
- End Sub
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д
