Sub CommandButton2_Click()

Dim t As Single, w As Single

Dim p As Single, k As Integer

P=1

For k = 1 To 6

t = Val(InputBox(“t=”))

p=p*sin(t(k))

Next

w=2+p

MsgBox w

End Sub

Одномерные массивы. Вычисление экстремумов

Массивами называются совокупности данных одного типа, объединенные одним именем. Элементы массивов называются индексированными переменными.

Одномерные массивы имеют один индекс, например a(i), где a – имя массива, i – номер элемента массива.

Массивы, до их использования в программе, должны быть объявлены в операторе Dim, например:

Dim a(5) As Single

Здесь определено, что будет использоваться одномерный массив с 6-ю элементами вещественного типа одинарной точности. Число в скобках указывает номер последнего доступного для использования номера индекса. Нумерация индексов начинается с нуля.

После объявления элементы массива могут использоваться в выражениях подобно простым переменным, но с указанием индекса в круглых скобках. Например, после приведенного выше объявления массива а(i) в программном коде можно обращаться к следующим элементам массива: а(0), а(1), а(2), а(3), а(4), а(5)

Если необходимо использовать определенную нумерацию элементов массива, например с 5 до 10, то это указывается при объявлении массива следующим образом:

Не нашли, что искали? Воспользуйтесь поиском: