Константи типу масивів pascal-паскаль

Константи типу масивів

Тип компонентів масиву може бути будь-яким, крім файлового.

Type Status = (Active, Passive, Waiting);
StatusMap = Array [Status] Of String [7];
Const StatStr. StatusMap = ( 'Active', 'Passive', 'Waiting');
StatStr [Active] = 'Active'
StatStr [Passive] = 'Passive'
StatStr [Waiting] = 'Waiting'>

Символьні масиви:

Упаковані константи зі строковим типом (символьні масиви) можуть бути визначені і як поодинокі символи, і як рядки. Наприклад, таке визначення:

Приклад масиву строкового типу

Const Digits. Array [0..9] Of Char = ( '0', '1', '2', '3', '4', '5', '6', '7', '8', '9' );

може бути виражено більш коротко:

Приклад короткого масиву строкового типу

Const Digits. Array [0..9] Of Char = '0123456789';

Нуль-засновані символьні масиви:

Нуль-заснований символьний масив - це такий масив, в якому індекс першого елемента дорівнює нулю, а останнього - позитивного ненульова цілому числу.

Приклад нуль-заснованого символьного масиву

Array [0..X] Of Char;

Якщо ви включаєте розширений синтаксис (за допомогою директиви компілятора), то нуль-заснований символьний масив може бути инициализирован рядком, довжина якої менше, ніж оголошена довжина масиву.

Приклад нуль-заснованого символьного масиву з обмеженою довжиною

Const FileName = Array [0..79] Of Char = 'TEST.PAS';

Якщо рядок коротше, ніж довжина масиву. то залишилися символи встановлюються рівними NULL (0), і масив буде містити рядок з нульовим закінченням.

Константи - багатовимірні масиви:

Такі константи визначаються, укладенням констант кожної розмірності в окремі набори круглих дужок, розділені комами.

Приклад багатовимірного масиву:

Type Cube = Array [0..1, 0..1, 0..1] Of Integer;
Const Array _Maze. Cube = (((0, 1), (2, 3)), ((4, 5), (6, 7)));

Створений багатовимірний масив:

Array _Maze [0, 0, 0] = 0
Array _Maze [0, 0, 1] = 1
Array _Maze [0, 1, 0] = 2
Array _Maze [0, 1, 1] = 3
Array _Maze [1, 0, 0] = 4
Array _Maze [1, 0, 1] = 5
Array _Maze [1, 1, 0] = 6
Array _Maze [1, 1, 1] = 7

програмування

Вихідні тексти Pascal (127)

Схожі статті