100 BEGIN
110 INTEGER I;
120 SWITCH N := L1, L2, L3;
130 FOR I := 1 STEP 1 UNTIL 3 DO
140     BEGIN GOTO N[I];
150     GOTO DONE;
160 L1: PRINT ("ONE");
170     GOTO DONE;
180 L2: PRINT ("TWO");
190     GOTO DONE;
200 L3: PRINT ("THREE");
210 DONE: END OF LOOP;
220 END OF PROGRAM
