Студопедия.Орг Главная | Случайная страница | Контакты | Мы поможем в написании вашей работы!  
 

Двумерные массивы



а) Описание массивов

Dim <имя массива>(<начальное значение индекса по строкам> To <конечное значение индекса по строкам >,

< начальное значение индекса по столбцам> To < конечное значение индекса по столбцам>) As <тип элементов массива>

Пр: Dim A(1 To 10, 1 to 5) As Integer - массив состоит из 50 элементов (10 строк и 5столбцов), тип каждого элемента - Integer.

б) Обращение к элементу массива

Обращение к элементу массива осуществляется следующим образом: указывается имя массива, а затем в круглых скобках через запятую указывается номер строки и номер столбца, где размещен элемент в массиве.

Пр: A(1,4)=15 - элементу, находящемуся в первой строке и четвертом столбце массива А присваивается значение 15

в) Ввод массивов

Массивы можно вводить как с листа Excel, так и используя встроенную функцию InputBox.

1) for i=1 to 10

for j=1 to 4

A(i,j)=InputBox("Введите A(" & i & "," & j & ")")

next j

next i

2) for i=1 to 10

for j=1 to 4

A(i,j)=Worksheets(1).Cells(i,j)

next j

next i

г) Изображение ввода двумерных массивов в блок-схемах

 
 


ЗАДАНИЯ ДЛЯ ВЫПОЛНЕНИЯ. ОБРАБОТКА ДВУМЕРНЫХ МАССИВОВ

В программе для решения требуемой задачи:

1.Создать двумерный массив размерностью 4´4,состоящий из элементов, которые являются произвольными положительными и отрицательными числами. Его ввод обеспечить, используя InputBox или считывая данные, предварительно записав их на лист Excel.

2. Предусмотреть вывод сформированного массива на лист Excel.

3. Задания для выполнения:

- Найти количество элементов массива больших или равных заданному значению.

- Найти количество отрицательных чисел среди элементов и массива.

- Найти максимальное значение, которое имеют элементы массива.





Дата публикования: 2015-10-09; Прочитано: 209 | Нарушение авторского права страницы | Мы поможем в написании вашей работы!



studopedia.org - Студопедия.Орг - 2014-2024 год. Студопедия не является автором материалов, которые размещены. Но предоставляет возможность бесплатного использования (0.007 с)...