Type
  AIT = array[1..20] of integer; // Тип массивов из 20 целых чисел, занумерованных числами от 1 до 20

Var
  AI : AIT;                        // Один из таких массивов