QBasic的九九乘法表位置错误

来源:百度知道 编辑:UC知道 时间:2024/05/30 01:24:37
5 CLS
10 DIM x(9), y(9)
20 PRINT " * ";
30 FOR i = 1 TO 9
40 x(i) = i
50 PRINT x(i);
60 NEXT i
70 PRINT
80 FOR i = 1 TO 9
85 y(i) = i
90 PRINT y(i);
100 FOR n = 1 TO 9
120 PRINT x(n) * y(i);
130 NEXT n
140 PRINT
150 NEXT i
160 END
上面是我编的表,可是显示的时候数总是对不齐:
* 1 2 3 4 5 6 7 8 9
1 1 2 3 4 5 6 7 8 9
2 2 4 6 8 10 12 14 16 18
3 3 6 9 12 15 18 21 24 27
4 4 8 12 16 20 24 28 32 36
5 5 10 15 20 25 30 35 40 45
6 6 12 18 24 30 36 40 46 54
7 7 14 21 28 35 42 49 56 63
8 8 16 24 32 40 48 56 64 72
9 9 18 27 36 45 54 63 72 81
编出来后显示是这样的,位置不知道怎么才能对齐...各位帮帮怎么改吧?

改好了,整齐了:

20 PRINT " * ";
30 FOR i = 1 TO 9
40 x(i) = i
50 PRINT " "; x(i);
60 NEXT i
70 PRINT
80 FOR i = 1 TO 9
85 y(i) = i
90 PRINT y(i);
100 FOR n = 1 TO 9
120 xy = x(n) * y(i)
122 IF xy < 10 THEN PRINT " ";
124 PRINT xy;
130 NEXT n
140 PRINT
150 NEXT i
160 END