Constante, cum ar fi matricele-Pascal pascal
Constantele cum ar fi matrici
Componentele tip de matrice poate fi oricare altul decât un fișier.
Tip de stare = (Activ, pasiv, în așteptare);
StatusMap = Array [Stare] Din String [7];
Const StatStr. StatusMap = ( 'Activ', 'pasivă', 'în așteptare');
StatStr [Activ] = 'Activ'
StatStr [Passive] = 'pasiv'
StatStr [Așteptare] = 'Așteptare'>
Tablourile de caractere:
La pachet cu un tip șir constant (caractere matrice) poate fi identificat ca un singur caracter, și ca șiruri. De exemplu, următoarea definiție:
EXEMPLU tip string matrice
Const Digits. Array [0..9] Char = ( '0', '1', '2', '3', '4', '5', '6', '7', '8', '9' );
Acesta poate fi exprimat mai pe scurt:
EXEMPLU tip scurt șir matrice
Const Digits. Array [0..9] Char = '0123456789';
Zero pe bază de matrice de caractere:
Zero bazate pe matrice de caractere - este o matrice în care indicele primului element este egal cu zero, iar ultimul - un număr întreg de zero pozitiv.
EXEMPLUL zero, pe bază de matrice de caractere
Array [0..X] De Char;
Dacă activați sintaxa extinsă (folosind directive compilator), pe bază de zero-matrice de caractere poate fi inițializat cu un șir de caractere, a căror lungime este mai mică decât lungimea matrice declarată.
EXEMPLU zero, pe bază de lungime caractere array limitat
Const FileName = Array [0..79] Char = 'TEST.PAS';
Dacă șirul este mai scurt decât lungimea matrice. simbolurile rămase sunt setate la NULL (0), iar matrice va conține un șir terminat-nul.
Constante - tablouri multi-dimensionale:
Aceste constante sunt determinate, concluzia constantele fiecare dimensiune în seturi separate de paranteze, separate prin virgulă.
EXEMPLU matrice dimensionale:
Type Cube = Array [0..1, 0..1, 0..1] Din Integer;
Array Const _Maze. Cube = (((0, 1), (2, 3)), ((4, 5), (6, 7)));
A fost creată o matrice multidimensională:
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