'BEGIN' 'COMMENT' LIBRARY 1; 'INTEGER' I; 'SWITCH' S := S1, S2, S3; I := 1; 'GOTO' S[I]; 'FOR' I := 1, 2, 3 'DO' 'BEGIN' S1 :; OUTREAL(99, 10); S2 :; OUTREAL(99, 20); OUTREAL(99, I) 'END'; S3 :; OUTREAL(99, 30) 'END'