Массивы Массив это величины объединенные общим именем и различаемые порядковыми номерами. Номера называются индексами. В зависимости от количества индексов массивы бывают одномерными и двухмерными (их еще называют матрицами). Объявление массива. Dim имя( N To K ) as тип одномерный массив Dim имя( N To K, N To K ) as тип двухмерный массив N - первое значение индекса К - последнее значение индекса

Например: Dim a(1 To 10) As Integer Dim b(1 To 3, 1 To 4) As Double При объявлении числовой массив заполняется нолями, текстовый пустыми значениями. Обращение к элементам массива. имя(индекс) одномерный массив имя(индекс, индекс) двухмерный массив Например: a(5); b(2, 3);

Алгоритм заполнения массива а значениями. a(1)=3 a(2)=6 a(3)=2 a(4)=12 и так далее

Алгоритм заполнения массива случайными целыми числами со значениями от 0 до 20 For i=1 To 10 a(i)=Int(Rnd()*20) Next i

Алгоритм определения суммы элементов массива Sum=0 For i=1 To 10 Sum=Sum+a(i) Next i

Алгоритм подсчета количества элементов с заданными свойствами (например со значениями больше 10) Kol=0 For i=1 To 10 If a(i)>10 Then Kol=Kol+1 Next i

Алгоритм нахождения максимального элемента массива Max=a(1) Nom=1 For i=2 To 10 If Max

Алгоритм вывода значений массива в TextBox For i=1 To 10 Text1.Text=Text1.Text+Str(a(i))+; Next i

Задание Составьте программу заполнения массива числами 2,6; 1,1; 3,4; 6,7; 1,2; 4,2; 8,3; с последующим выводом значений, определения суммы, определения количества элементов значение которых больше 2,5. Определить элемент с максимальным значением и его номер. Все найденные значения вывести.