Pascal - размер массива

Question

У меня есть код, в который я ввожу каждый номер на новую строку, пока не напишу 0. Я смущен размером массива. В начале я объявляю, что A - массив с индексами от 1 до 5. Но когда я продолжаю писать и помещать более 5 чисел, кажется, что он все еще сохраняется, а затем используется вторым во время цикла. Как это возможно? Я думал, что если у меня закончится индексы, я получу ошибку.

program testarray; 
var hmez,        
    i:integer;       
    A:array [1..5] of integer; 

begin 
i:=0; 
    repeat            
    inc(i); 
    readln(A[i]); 
    if A[i]=0 then hmez:=i-1; 
    until A[i]=0; 
for i:=1 to hmez do 
    writeln(A[i]); 
end. 

Answer 1

Вы переписываете память, которая не принадлежит переменной A. Это рано или поздно вызовет необработанное исключение (ошибка времени выполнения) или любое другое «странное» поведение, вызванное утечкой памяти. В отличие от «управляемых» языков, таких как C# или Java в Pascal, проверка времени индексов массива является необязательной функцией, а не обязательной, принудительной, языковой функцией.

Компиляторы Pascal обычно имеют возможность включать или выключать проверку индекса массива, которая называется «проверка диапазона». Директива {$R+} включает эти проверки диапазона - см. documentation here.

В вашем случае код «работает», потому что, вероятно, нет другой полезной переменной, помещенной в память после пространства, выделенного для A. Обратите внимание, что это всего лишь совпадение, и, возможно, это не так во всех программах вашей программы. Как правило, ваша программа as-is неверна.