FOR

FORループ文

FORループ文を使うと、いくつかの行を一定の回数だけ繰り返させることができる。
ループの流れ

FORループ文は以下のように書きます。

FOR　変数:=初期値　TO　終了値　DO
　　　　　文；

　　※変数は　INTEGER型でなければいけません。
例

PROCEDURE TEST;
VAR
		i:INTEGER;
BEGIN
		FOR i:=5 TO 10 DO
			Writeln(i);
END;
Run(TEST);

［文が複数行ある場合］
文が複数行ある場合は　BEGINとENDでくくります。
例

PROCEDURE TEST;
VAR
		i:INTEGER;
BEGIN
		FOR i:=5 TO 10 DO
		BEGIN
			Writeln(i);
			Writeln(i*2);
			Writeln(i*4);
		END;
END;
Run(TEST);

［グループ内での注意］
ループ中の文でカウンタ変数の値を変更してはいけません。
プログラムが正常に動かない可能性があります。
悪い例

PROCEDURE TEST;
VAR
		i:INTEGER;
BEGIN
		FOR i:=5 TO 10 DO
		BEGIN
			Writeln(i);
			i:=i-1; {カウンター変数の値を変更している}
		END;
END;
Run(TEST);

また初期値と終了値のいずれにもカウンタ変数を含めてはいけません。
悪い例

PROCEDURE TEST;
VAR
	i:INTEGER;
BEGIN
	FOR i:=5 TO i DO {終了時にカウンター変数を使っている}
		Writeln(i);
END;
Run(TEST);