请问有人会写九九表的程序吗?_Script程序语言论坛

来源:百度文库 编辑:神马文学网 时间:2024/05/01 16:26:42
返回>Script程序语言论坛 2009-2-19 8:05:15 来自:会员 快速回复 添加新话题 - 主题内容: 请问一下程序要如何写才能执行出如下列所显示的九九表?
X|123456789
================================
9|91827364554637281
8|816243240485664
7|7142128354249
6|61218243036
5|510152025
4|481216
3|369
2|24
1|1
引用

虹ㄟ 我之前有写过..但是是用qb写的..内容有点不一样
虽然很想改好给在po给你..可是我vb学的不好..我怕改错
所以我po上来..知道怎么改的人帮忙改一下噜!!
CLS
PRINT"XI";
FORN=1TO9
PRINTUSING"####";N;
NEXTN
PRINT
FORJ=1TO41
PRINT"=";
NEXTJ
PRINTTAB(4);"I"
FORX=9TO1STEP-1
PRINTX;"I";
FORY=1TOX
M=X*Y
PRINTUSING"####";M;
NEXTY
PRINTTAB(4);"I"
NEXTX
END
引用
一个刚学VB.NET的人 还是非常感谢你的帮忙
引用

sabcat 大致是这样..其它的请自己写
Fori=9To1Setp-1
Forj=1Toi
..............
Next
Next
引用

好手 几点提示:
1、九九乘法表的格式是:a×b=c,且因为C是a和B相乘的结果,所以当然您必须要以两个迴圈来跑。
2、乘法表范围为:(1~9)×(1~9),迴圈都各跑九次。
============================================
这两点提示在加上上面的话,应该一秒钟就可以看出来怎么写了^^"
引用
一个刚学VB.NET的人 非常感谢两位的帮忙,可是我最主要的问题是在
X|123456789
================
9|
8|
7|
6|
5|
4|
3|
2|
1|
这个地方怎么带出来,而不是中间的乘法
引用

sabcat >>X|123456789
>>================
个人的作法是自行手动输出

>>9|
>>8|
>>7|
这个..在进入第二层for...next迴圈之前就先行输出
Fori=9To1Setp-1
console.writei&"|"
Forj=1Toi
..............
Next
console.writevbcrlf←这个不确定能不能这样用..换行..很久没写了
Next




引用
一个刚学VB.NET的人 非常谢谢你,我已经知道怎么写了
引用

雷火 Dim i, j As Short
Dim strLine, strResult As String
strResult &= "X" & vbTab & "|" & vbTab & "1" & vbTab & "2" & vbTab & "3" _
& vbTab & "4" & vbTab & "5" & vbTab & "6" & vbTab & "7" & vbTab & "8" & vbTab & "9"_ & vbNewLine
strResult &= "================================" & vbNewLine

For i = 9 To 1 Step -1
strLine = i & vbTab & "|" & vbTab
For j = 1 To i
strLine &= i * j & vbTab
Next
strResult &= strLine & vbNewLine
Next

  暂无评论,欢