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