const n = 10; // Константа n определяет длину массива type Arr10 = array[1 .. n] of integer; // Используя n, описываем целый тип массивов var A,B : Arr10; // Используем описание типа Arr10 для описания переменных A, B