DECLARE i:INTEGER

FOR i <- 1 TO 10
    OUTPUT i
NEXT i