CLS
 FOR i = 1 TO 5
 PRINT TAB(10 - i); STRING$(2 * i - 1, "A");
 PRINT SPACE$(10 - 2 * i); STRING$(2 * i - 1, "A")
 NEXT i
 END
 两个ＰＲＩＮＴ语句可写在同一行！！！