Поняття масиву
Масив – це набір однотипних елементів. Кожен елемент має свій
номер (індекс). Всі елементи масиву упорядковані за своїм індексом. Масив
може бути одновимірним чи багатовимірним. Вимірність масивів – не
обмежується, але сумарна величина масиву не може перебільшувати 65520
байт.
Задати тип масив можна двома способами:
• з використанням ключового слова type;
• без використання ключового слова type.
Перший спосіб використовується тоді, коли є необхідність багаторазового
використання даного типу для опису змінних у ході виконання програми (коли
змінні цих типів необхідно передавати до процедур чи функцій, або коли
необхідно описати дані такого типу, як локальні в кількох різних процедурах чи
функціях).
Наприклад:
а). з використанням ключового слова type
type
massiv = array [1..5] of real;{задано одновимірний масив із 5-ти
елементів}
matrix = array [1..5,1..5] of real;{задано двовимірний масив(матрицю),
що складається із 5-ти рядків, кожний з
яких містить 5 елементів}
…
var
a,b:massiv;
c:matrix;
б). без використання ключового слова type
var
a,b: array [1..5] of real;
c: array [1..5,1..5] of real;
Оскільки елементи масиву упорядковані за своїми індексами, то для
доступу до конкретного елементу масиву використовується індекс(номер
елемента).
Розглянемо приклад:
var
a,b:array[1..5] of real;{створимо 2-а масиви по 5 елементів}
c:array[1..5,1..5] of char;{створимо матрицю символів розмірністю 5×5}
…
a[1]:=3;{присвоїмо значення три першому елементу масиву}
a[5]:=1;{присвоїмо число 1 п’ятому елементу масиву}
b[3]:=a[5];{третьому елементу масиву b присвоїмо значення п’ятого
елемента масиву a}
c[2,3]:=’d’;{третьому елементу другого рядка матриці с присвоїти
значення символа ‘d’}
При роботі з масивами зручно користуватись операторами циклів.
Наприклад, якщо в масиві цілих чисел mas із десяти елементів значення
кожного з елементів повинно дорівнювати квадрату індексу цього елементу, то
присвоїти ці значення елементам масиву можна за допомогою наступних
команд:
var
mas:array[1..10] of integer;
i:integer;
…
for i:=1 to 10 do
begin
mas[i]:=i*i;
end;
Немає коментарів:
Дописати коментар