如何在for循环中增加计数器?(帕斯卡)

str*_*mig 1 pascal for-loop increment

我有一个大问题,因为这段代码是在Dev-Pascal中正确编译的,而不是在Lazarus中正确编译的。

 for k:=1 to n do
     begin
          writeln(a[k]:4:2,'  ',a[k+1]:4:2,'  ',a[k+2]:4:2);
          inc(k,2);
     end;
Run Code Online (Sandbox Code Playgroud)

我收到此消息

错误:非法分配给for循环变量“ k”

我现在该怎么办?我的程序中需要此解决方案(递增k计数器)。

Mar*_*ynA 5

实际上,我认为更多是Dev-Pascal让您摆脱困境的情况,而FP则不然。编译器通常不允许您for在循环内修改变量的原因是,它可以颠覆编译器生成的代码,以确定何时for达到上限。

添加一个局部变量j,为其分配相同的起始值k,在for循环内将其递增2,并j用作数组索引器k