Pascal错误:尝试编译时无法分配左侧

时间:2018-07-16 21:14:36

标签: pascal

尝试编译时出现此错误。 pascal error image

左侧不能分配给/ bin的21/22。

这是我的代码

Program urut;
Uses Wincrt;
Const N =  5;
   data:  Array [1..N] Of Integer =  (2,4,5,3,1);
Var
   j,k,temp :  Integer;
Begin
 Clrscr;
Writeln ('Data sebelum diurutkan');
For j:=1 To N Do
   Begin
     Writeln('data[' ,j, ']= ',data [j]);
  End;
For j:=1 To N-1 Do
  Begin
     For k :=N Downto j+1 Do
        Begin
           If data[k] < data[k-1] Then
              Begin
                 temp := data[k];
                 data[k] := data[k-1]; //left side cannot be assigned to
                 data[k-1] := temp; //left side cannot be assigned to
              End;
        End;
  End;
Writeln;
Writeln ('Data setelah diurutkan ');
For j:=1 To N Do
   Begin
      Writeln ('data[' ,j, '] = ',data[j]);
   End;
 Writeln;
 End.  
  

抱歉,模式发布不正确   ,非常感谢。

1 个答案:

答案 0 :(得分:0)

就像汤姆·汤姆·布朗伯格(Tom Brunberg)所说,我的数组是const,无法更改。因此,我需要删除该const。

应该是

data: Array [1..5] Of Integer = (value);

没有const,并将其放在var下,并带有另一个变量