Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
praktkum2012.pdf
Скачиваний:
63
Добавлен:
23.02.2015
Размер:
9.66 Mб
Скачать

3 Работа с элементами массива

Пример программы с использованием массивов:

Dim

Y(99),

Z(99,99,99)

Y(0)

=

"Это

1-ый

элемент массива Y - строка"

Y(1)

=

123.456

' Тип второго элемента - число

Y(99)=

#12-30-2007# ' Тип 100-го элемента - дата

Z(99,99,99)="Это

элемент трехмерного массива Z "_

 

 

 

& "с

индексом 99,99,99"

MsgBox Y(0) & vbLf & "2-ой элемент массива Y - число: " _

&Y(1) & vbLf & "100-ый элемент массива Y - дата: " _

&Y(99) & vbLf & Z(99,99,99),,"Студент Иванов И. И."

Окно, которое показывает эта программа, показаны на рисунке 14.1.

Рисунок 14.1 – Пример на использование массивов

Учебное задание

1)Опишите в программе два одномерных массива размерностью 3 и 5 элементов, присвойте значения элементам первого массива – нечетные числа, начиная с 21, второго – буквы русского алфавита, начиная с мягкого знака. Покажите все данные в окне сообщений.

2)Опишите в программе динамический массив. Выполните вначале его инициализацию для размерности 3 элемента и присвойте значения элементам массива – любые числа. Покажите все данные в 1-м окне сообщений. Затем выполните повторную инициализацию для размерности 7 с сохранением значений определенных ранее элементов. Присвойте элементам с 4 по 7-й любые даты. Покажите все данные во 2-м окне сообщений.

3)Опишите в программе двухмерный массива размерностью 2 × 3 элементов и присвойте значения каждому элементу массива – время в диапазоне от 7:00 до 19:00. Покажите данные в окне сообщений в виде мат-

129

рицы, в которой номер строки – первый индекс, в строке изменяется второй индекс.

4)Задайте с помощью функции Array значения 5-ти элементам массива, представляющим собой геометрическую прогрессию. Покажите все данные в окне сообщений.

5)Создайте с помощью функции Array одномерный массив, состоящий из 6-ти чисел. Покажите данные в окне сообщений. С помощью функции ReDim переопредилите его размерность до двухмерного размерностью 3 × 2. Задайте значения всем его элементам и покажите их в окне сообщений в виде матрицы, в которой номер строки – первый индекс, в строке изменяется второй индекс.

6)Опишите в программе трехмерный массива размерностью 2 × 3 × 4 элементов и присвойте числовые значения элементам массива. Покажите данные в окне сообщений с указанием элемента массива и его значение (например, A(0,0,0)=1 и т. д.).

7)Задайте элементам двумерного массива текстовые значения – каждому одно слово какого-либо четверостишия. Покажите элементы массива в окне сообщений в виде стихотворения.

8)Опишите в программе два одномерных массива X и Y размерностью 5 элементов, присвойте числовые значения элементам массивов. Покажите данные в окне сообщений в виде таблицы, в первой строке которой показаны имена массивов, в последующих – значения их элементов.

9)Опишите в программе одномерный массив из 7 элементов. Присвойте значения элементам – целые числа. Покажите элементы массива в окне сообщений в следующем порядке: 1, 7, 2, 6, 3, 5, 4.

10)Опишите в программе два одномерных массива размерностью 5 элементов, присвойте числовые значения элементам массивов. Покажите данные в окне сообщений: в первой строке элементы первого массива от первого до 5-го, во второй строке – элементы второго массива от 5-го до первого.

130

Соседние файлы в предмете [НЕСОРТИРОВАННОЕ]