Курс за вибором Основи візуального програмування
Масив Масив Якщо треба зберігати чи обробляти багато числових даних, то незручно заводити для цього стільки змінних величин. Тут і знадобиться такий тип даних як ТАБЛИЦЯ або МАСИВ. Масив – це структура даних, яка має однорідну, фіксовану сукупність елементів, упорядкованих за номерами.
Порядок роботи з масивом Порядок роботи з масивом 1. Оголосити масив у програмі. 2. Заповнити масив даними. 3. Вивести готовий масив на екран. 4. Обробити дані масиву, розв язати поставлену задачу. 5. Вивести результати роботи та результуючий масив на екран.
Види масивів Види масивів Масиви бувають : Одновимірні ( лінійні ). Двомірні ( прямокутні ) Номери елементів Номери рядків та стовпчиків
Виділення пам ' яті під масив Dim А(3) As Integer Виділено 4 комірки під елементи масиву: А(0), А(1), А(2), А(3). Dim t (3, 4) As Integer t(0,0)t(0,1)t(0,2)t(0,3)t(0,4) t(1,0)t(1,1)t(1,2)t(1,3)t(1,4) t(2,0)t(2,1)t(2,2)t(2,3)t(2,4) t(3,0)t(3,1)t(3,2)t(3,3)t(3,4)
Способи задання масиву 1. Дані масиву задає програміст в програмі. 2. Дані масиву задає користувач. 3. Дані масиву задає ПК випадковим чином.
Масив задає програміст Масив задає програміст Елементи масиву вводить програміст, а користувач їх не знає і не бачить. Назва масиву Розмір масиву Тип даних масиву Елементи масиву Dim А (3) As Integer А(0)=0: А(1) = 500:А(2) = 400:А(3) = 600 Dim А() As Integer = {0, 500, 400, 600} Dim t (, ) As Integer = { {99, 99, 99, 99, 99}, {99, -8, -14, -19, -18}, {99, 25, 28, 26, 20}, {99, 11, 18, 20, 25} } Задання елементів двовимірного масиву
Масив задає користувач Масив задає користувач Назва масиву Розмір масиву Тип Даних масиву наповнення масиву даними Dim А(3) As Integer А(0) = InputBox("Введіть 1-е число ") А(1) = InputBox("Введіть 2-е число ") А(2) = InputBox("Введіть 3-е ") А(3) = InputBox("Введіть 4-е число") Debug.WriteLine (a(1) + a(2) + a(3))
Заповнити масив з 10 елементів випадковими числами. Dim N(9),I As Integer Randomize() For I = 0 To 9 N(I) = Int(Rnd() * 50) Next
Помилки при використанні масиву А(4) = 200 Повідомлення системи Index was outside the bounds of the array что означає: Елемент з таким номером не існує
Які бувають масиви за значеннями ? Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click Dim b(30, 6) As Boolean Dim DT(10) As Date b(2, 3) = False b(5, 0) = Not b(2, 3) Debug.WriteLine (b(5, 0)) DT(2) = #1/15/ :59:42 PM# DT(0) = DT(2).AddDays(10) If b(5, 0) Then Debug.WriteLine (DT(0)) End Sub Результат роботи True :59:42
Що буде надруковано ? Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button10.Click Dim a() As Integer = {0, 5, 3, 4, 0, 20, 10, 23, 2, 9, 1000} Dim i As Integer For i = 1 To 8 Debug.WriteLine(a(i) + a(i + 1) + a(i + 2)) Next End Sub