Private Sub Command1_Click()

Отчет по лабораторной работе №5

Работа с массивами

 

 

Выполнил: студент группы ОД – 144

Хасанов Э. Р.

Проверил: Сираева Л. Р.

 

2004г.

Цель работы

 

Цельюработы является изучение возможностей разработки приложений с использованием одномерных и двумерных массивов.

 

I. Что такое массив?

Массивы

Для хранения величин кроме простых переменных можно использовать массивы. Массив представляет собой набор переменных с одним именем и разными индексами. Каждая такая переменная называется элементом массива.

 

II. Что называется размером массива?

 

Количество хранящихся в массиве элементов называется размером массива. Размер массива ограничен объемом оперативной памяти и типом данных элементов массива.

 

III. Могут ли элементы одного и того же массива иметь разный тип?

 

Все элементы массива имеют одинаковый тип. Однако если массив имеет тип variant, то отдельные элементы могут содержать данные разных типов. Например, одни элементы могут быть числами, другие — строками или объектами.

 

IV. Как выполняется обращение к элементам массива?

 

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

Например,

strNames(l), strNames(2), strNames(l0) - являются элементами массива с именем strNames.

 

V. Что понимается под диапазоном значений индекса массива?

 

Диапазон значений индекса массива имеет верхнюю и нижнюю границу значений. При объявлении массива после его имени в скобках задается верхняя граница диапазона значений индекса. Эта граница не может превышать диапазона, представляемого типом Long. По умолчанию, нижней границей диапазона значений индекса является 0, но нижнюю границу можно и указать явно.

 

VI. Как задается размерность массива при его описании?

 

При описании массива мы задаем его размерность, указав верхнюю и нижнюю границы массива. Например: Am(1to50).

 

VII. Какое значение принимает нижняя граница диапазона значений индекса по умолчанию?

По умолчанию, нижней границей диапазона значений индекса является 0, но нижнюю границу можно и указать явно.

 

VIII. Чем ограничена верхняя граница диапазона значений индекса?

 

При объявлении массива после его имени в скобках задается верхняя граница диапазона значений индекса. Эта граница не может превышать диапазона, представляемого типом Long.

IX. Как можно организовать ввод элементов одномерного массива?

 

Для того чтобы организовать ввод элементов одномерного массива, нужно организовать один цикл: по строке или по столбцу. Ввод элементов можно производить с клавиатуры, по формуле или элементы массива могут задаваться как случайные числа.

 

av = Split(Text2, " ")

For i = 0 To Text1 - 1

Am(i) = Val(av(i))

 

X. Как можно организовать ввод элементов двумерного массива?

 

Для того чтобы организовать ввод элементов двумерного массива, нужно организовать два цикла: по строке и по столбцу. Ввод элементов можно производить с клавиатуры, по формуле или элементы массива могут задаваться как случайные числа. Ввод элементов можно производить с клавиатуры, по формуле или элементы массива могут задаваться как случайные числа. Например ввод массива с клавиатуры:

txt = "Vvod" + Text2 + " elementa stroki"

For i = 0 To Text1 - 1

x = InputBox(txt, "Vvod dan")

av = Split(x, " ")

For j = 0 To Text2 - 1

am(i, j) = Val(av(j))

 

XI. Как можно организовать вывод элементов одномерного массива?

 

Для того чтобы организовать вывод элементов одномерного массива, с помощью функции print выводим одномерный массив am(i) на ту область, в которую нам нужно. Например на область – Picture.

 

Picture1.Print am(i);

 

XII. Как можно организовать вывод элементов двумерного массива?

Для того чтобы организовать вывод элементов двумерного массива, с помощью функции print выводим двумерный массив am(i,j) на ту область, в которую нам нужно. Например на область – Picture.

 

Picture1.Print am(i, j);

XIII. Для чего при работе с массивами используется функция Split?

 

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

 

XIV. Как организовать вывод элементов двумерного массива в таблицу?

 

Для того чтобы организовать вывод двумерного массива на таблицу надо воспользоваться функцией MSFlexGrid.text. Например форматный вывод двумерного массива на таблицу.

 

MSFlexGrid1.Text = Format(am(i, j), "0.000")

Коды программ.

1.

Dim Am(50) As Double

Sub Command1_Click()

Picture1.Cls

s = 0

av = Split(Text2, " ")

For i = 0 To Text1 - 1

Am(i) = Val(av(i))

If Am(i) > 0 Then s = s + Am(i)

Next

Picture1.Print s

End Sub

2.

Dim am(50, 50) As Double

Private Sub Command1_Click()

Picture1.Cls

Max = am(i, 0)

txt = "Vvod" + Text2 + " elementa stroki"

For i = 0 To Text1 - 1

x = InputBox(txt, "Vvod dan")

av = Split(x, " ")

For j = 0 To Text2 - 1

am(i, j) = Val(av(j))

If am(i, j) > Max Then Max = am(i, j)

Picture1.Print am(i, j);

Next

av = ""

Picture1.Print

Next

Picture2.Print Max

Picture3.Print i; j

End Sub

3.

4.