배열 범위 오류 (파스칼)

Question

나는 수업을 위해 파스칼에서 숙제를하고 있는데, 나는 걸림돌을 때렸다. 기본적으로 작동하지만 숙제 제출 사이트에서 저에게 완전한 신용을 부여하지 않았습니다. 나는 교수님에게 이메일을 보내고 그는 {$ r +} 지시어로 나를 감추었습니다. 이를 포함 시키면 런타임 오류 201이 발생합니다. 문제가 범위 검사와 관련이 있다는 것을 알고 있지만 어떤 변경으로 문제가 해결되는지 알 수 없습니다. 어떤 도움이라도 대단히 감사합니다.

{$mode Delphi} 
{$r+} 
program InversePerm; 
var 
    N: integer; // Size of set of numbers 
    i: integer; // counter 
    x: integer; // array-slot counter 
    perm: array of integer; // THE array 

begin 
    read(N); 
    setlength(perm, N); // sets array size to user input 
    for i := 1 to N do 
     begin 
     read(x); 
     perm[x] := i; 
     end; 
    for i := 1 to N do              
     write(perm[i], ' '); 
    end. 

Answer 1

나는 당신의 문제는 라인에 생각 : 그렇지 않으면

perm[i] := x;

내가 100 ×을 입력하면 :

perm[x] := i; 난 당신이 있었다 쓸 무엇을 의미하는지 생각 다음 코드는 첫 번째 반복에서 perm [100] = 1을 수행합니다. N에 10을 입력하면 범위 오류가 발생합니다.