Změny

identifikátor =array[X..Y] of type

{ Deklarace pole }

type Seznam =array[1..100] of Integer;