projects
/
qbasicapps.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
b23ae874f6258bf72f60d1e7e69d27d076b5d572
[qbasicapps.git]
/
tutorial
/
group1
/
16.bas
1
CLS
\r
2
\r
3
FOR b = 1 TO 10
\r
4
FOR a = 1 TO b
\r
5
PRINT "A";
\r
6
NEXT a
\r
7
PRINT
\r
8
NEXT b
\r
9
\r
10
PRINT
\r
11
\r
12
FOR b = 60 TO 0 STEP -8
\r
13
FOR a = 1 TO b
\r
14
PRINT "B";
\r
15
NEXT a
\r
16
PRINT
\r
17
NEXT b
\r
18
\r