标题:[求助]杨辉3角问题~!!!
只看楼主
寂静
Rank: 1
等 级:新手上路
帖 子:47
专家分:0
注 册:2004-10-16
 问题点数:0 回复次数:1 
[求助]杨辉3角问题~!!!
怎样才可以像个3角形的输出?????
我做的总是一竖行的打印出来的????

我就输出的搞不明白~


请各位赐教~~~

搜索更多相关主题的帖子: 杨辉 
2005-05-27 22:09
win2000
Rank: 1
等 级:新手上路
帖 子:2
专家分:0
注 册:2005-5-29
得分:0 

你想参加二级考试吧? Private Sub Command1_Click() Command1.Move (Form1.Width - Command1.Width) / 2, Form1.Height - 1200

For i = 1 To 9 CurrentX = Form1.Width / 2 - 270 * i For j = 1 To i Print j; Next n = i While n > 1 n = n - 1 Print n; Wend Print Next

End Sub

Private Sub Form_click() Cls End Sub

2005-05-29 15:01



参与讨论请移步原网站贴子:https://bbs.bccn.net/thread-19501-1-1.html




关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 1.352691 second(s), 7 queries.
Copyright©2004-2025, BCCN.NET, All Rights Reserved