DO WHILE 構文

DO WHILE 構文は、DO WHILE ステートメントで指定されたスカラー論理式が真であり続ける 限り、ステートメント・ブロックを繰り返し実行することを示します。 CYCLE ステートメントを使用して特定の繰り返しを短縮したり、EXIT ステートメントを使用して ループを終了することができます。



>>-DO_WHILE_statement------------------------------------------><
 
 
>>-statement_block---------------------------------------------><
 
 
>>-+-END_DO_statement---+--------------------------------------><
   '-terminal_statement-'
 
 

DO_WHILE_statement
構文の詳細については、DO WHILEを参照してください。

END_DO_statement
構文の詳細については、END (構文)を参照してください。

terminal_statement
DO WHILE 構文を終了するステートメントです。 詳細については、終端ステートメントを参照してください。

DO 構文の名前および範囲、アクティブ DO 構文と非アクティブ DO 構文、および終端ステートメントに 適用可能な規則は、DO WHILE 構文にも適用されます。

I=10
TWO_DIGIT: DO WHILE ((I.GE.10).AND.(I.LE.99))
  J=J+I
  READ (5,*) I
END DO TWO_DIGIT
END
IBM Copyright 2003