fexit.for

来自「开放源码的编译器open watcom 1.6.0版的源代码」· FOR 代码 · 共 11 行

      PRINT *, 'Start'
      I = 0
      LOOP
	  PRINT *, I
	  I = I + 1
	  GOTO 10
5	  PRINT *, 'Skip'
10    ENDLOOP
      PRINT *, 'End'
      END