主题：99乘法表
daihele
[专家分：0] 发布于 2007-08-12 13:12:00
编个99乘法表 第一行1*1=1 第二行1*2=2 2*2=4 第三行1*3=3 2*3=6 3*3=9 最后一行要QB程序打印在一行内 不可以转行
最后更新于：2007-08-12 13:42:00
回复列表 （共17个回复）
11 楼
为谁疯狂 [专家分：0] 发布于 2009-09-08 23:26:00
CLS
FOR I=1 TO 9
FOR J=1 TO 9
PRINT I;"*";J;"="I*J;
NEXT J
PRINT
NEXT I
END
12 楼
1054122 [专家分：750] 发布于 2009-09-10 12:34:00
easy
CLS
FOR i = 1 TO 9
FOR j = 1 TO i
a$ = jj$(i, j)
PRINT a$;
NEXT j
PRINT
NEXT i
END
FUNCTION jj$ (i, j)
jj$ = LTRIM$(STR$(i)) + "*" + LTRIM$(STR$(j)) + "=" + LTRIM$(STR$(i * j)) + " "
END FUNCTION
13 楼
phile [专家分：2310] 发布于 2009-09-10 17:30:00
尽是千篇一律！还有一楼，可用LTRIM$。
14 楼
天天和和 [专家分：1420] 发布于 2009-09-11 21:05:00
感觉上 都是 一样的~
15 楼
phile [专家分：2310] 发布于 2009-09-12 10:13:00
表现形式不一样
16 楼
天天和和 [专家分：1420] 发布于 2009-09-12 12:21:00
嗯
17 楼
phile [专家分：2310] 发布于 2009-09-13 10:56:00
额
我来回复
您所在位置：