Массивы. Возможные ошибки

c

onst Sz = 100; 

var 
  a: array [1..Sz] of integer;
  i: integer;

begin
  read(a); // неверно: массив необходимо вводить поэлементно
end.

Ссылки

Программы для начинающих