23. Computer Programming with flowcharting Technique (page 23)

FIG.25
7.1.5. e. DO [statement block] . . . LOOP [ (UNTIL) condition ] 
1E1.
10 CLS
15 PRINT “PROG020”
20 X = 1
30 DO
40 PRINT X;
50 X = X + 1
60 LOOP UNTIL X > 100
70 END

1E2.
10 CLS
15 PRINT “PROG021”
20 X = ( 1 – 1 )
30 DO
40 X = X + 1
50 PRINT X;
60 LOOP UNTIL X = 100
70 END