7.3. Контрольные вопросы

1. Дайте определение массива.

2. Чем отличается массив от простой переменной?

3. Что такое статический и динамический массивы? В чём их отличие?

4. Как получить доступ к элементу массива?

5. Синтаксис объявления статического и динамического массивов.

6. Изменение размера динамического массива.

7. Какой тип данных можно хранить в массиве?

8. Лабораторная работа №8

Обработка двумерных массивов.

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

8.1. Работа с матрицами

Двухмерные массивы называются матрицами; матрица – это таблица, содержащая m строк и n столбцов. Например, матрица А имеет вид:

, где m = 4; n = 5.

Элемент матрицы обозначается именем и двумя индексами  индекс строки (например, i) и индекс столбца (например, j)  на пересечении которых стоит этот элемент. В языке индексы отделяются друг от друга запятой и заключаются в квадратные скобки. Элемент A_ij обозначается как A(I,J).

Индексами могут быть константы, переменные, выражения, принимающие целые значения.

Пример оформления лабораторной работы

Задание

В построенной матрице A(7,4) определить количество элементов, для которых выполнено условие: -0,5 < a_ij < 0,5. Элементы матрицы строятся по правилу: a_ij = sin (i + j / 2). Матрицу напечатать.

Имена идентификаторов и свойства объектов управления представлены в таблицах 37 и 38, а результат работы приложения и блок-схема на рисунках 25 и 26.

Таблица 37 – Имена идентификаторов

Назначение переменной	Имя	Тип
Исходная матрица	A	Single
Переменная k	t	Integer
Переменная цикла	i	Integer
Переменная n	n	Integer
Переменная m	m	Integer
Переменная цикла	j	Integer

Таблица 38 – Свойства объектов

Элемент управления	Значение свойства:
	Caption	Name
CommandButton	Выполнить	CommandButton1
CommandButton	Выход	CommandButton2
CommandButton	Расчет	CommandButton1
Label	Исходная матрица	Label1
ListBox		ListBox1
Label	Количество элементов	Label2
TextBox		TextBox1

Событийная процедура кнопки Расчёт

Private Sub CommandButton1_Click()

Dim A(1 To 7, 1 To 4) As Single

Dim i As Integer, j As Integer, k As Integer

Dim sr As String

k = 0

ListBox1.Clear

For i = 1 To 7

sr = ""

For j = 1 To 4

A(i, j) = Sin(i + j / 2)

sr = sr + " " + Format(A(i, j), "0.000") + " "

If (A(i, j) > -0.5) And (A(i, j) < 0.5) Then k = k + 1

Next j

ListBox1.AddItem (sr)

Next i

TextBox1.Text = Str(k)

End Sub.

Рисунок 28 – Блок-схема

Рисунок 29 – Результат работы приложения