在线求代码
vb吧
全部回复
仅看楼主
level 4
有没有大佬教教孩子第五题[泪]
2022年04月30日 04点04分 1
level 15
关键部分代码(给数组元素赋值):
For i = 0 To n '这里没有按照提示从1开始,而是从0开始(更符合杨辉三角的组成),
'同时n也不是行数了,而是行数减1
a(i, 0) = 1
For j = 1 To i
a(i, j) = a(i - 1, j - 1) + a(i - 1, j)
Next j
Next i
输出提示:如果使用右对齐格式,Format函数更方便:
Print Format(a(i, j), String(5, "@"));
如果按照题目提示使用Tab“函数”(严格意义上说,Tab不是函数),左对齐的写法比较简单:
Print Tab(j * 5 + 1); a(i, j);
如果想用Tab实现右对齐,需要根据位数计算定位到的位置,比如这样:
Print Tab(j * 5 + 3 - Int(Log(a(i, j)) / Log(10))); a(i, j);
2022年04月30日 05点04分 2
level 11
【图片】字符大小控制、窗体大小控制以及杨辉三角【vb吧】_百度贴吧 https://tieba.baidu.com/p/6149301536?pid=125897304750&cid=0#125897304750
2022年04月30日 12点04分 3
1