REPEAT の変更点

• 追加された行はこの色です。
• 削除された行はこの色です。
• REPEAT へ行く。
• REPEAT の差分を削除

**REPEAT-UNTILループ文 [#m0bcc6b0]
REPEAT-UNTILループ文を使うと、条件を満たす間では、いくつかの行を繰り返し実行します。
ループの打ち切りに条件式を使っていることはWHILEループ文と似ていますが、
条件式をループ最後で評価している点が違います。
ループの流れ
&ref(loop03.jpg,,50%);
REPEAT-UNTILループ文は以下のように書きます。
REPEAT
　　文;
UNTIL 条件式;{条件を満たした時にループから抜ける}
例
 PROCEDURE TEST;
 VAR
		i:INTEGER;
 BEGIN
		i:=0; {iを初期化する}
	REPEAT
		Writeln(i);
		i:=i+1 {iに1を加える}
	UNTIL i>10;
 END;
 Run(TEST);

WHILEループ文と同様、無限ループには注意して下さい。