VB中数字金字塔 样式为:1 121 12321 1234321 以此类推,请问这个程序该怎么设计
题目
VB中数字金字塔 样式为:1 121 12321 1234321 以此类推,请问这个程序该怎么设计
答案
这个好像上学的时候是书上的题
Private Sub Command1_Click()
For i = 1 To 4 '这个4是层数,可以用变量,从键盘获取
Print Tab(30 - 3 * i); '30是第一行输出的位置,总之30 - 3 * i要大于0
For j = 1 To 2 * i - 1
If i >= j Then
Print j;
Else
Print 2 * i - j;
End If
Next
Print
Next
End Sub
给分!
举一反三
已知函数f(x)=x,g(x)=alnx,a∈R.若曲线y=f(x)与曲线y=g(x)相交,且在交点处有相同的切线,求a的值和该切线方程.
我想写一篇关于奥巴马的演讲的文章,写哪一篇好呢?为什么好
最新试题
- 谁能帮我写一篇作文 《 为父母做的一件好事》
- 已知:如图,点B、F、C、E在同一条直线上,FB=CE,AB//DE.求证:AC=DF
- 将一根绳子一半一半的剪去,剪了5次剩下的是原长的( )分之( )
- 甲乙丙三人份一筐苹果.甲分的苹果的重量的是乙的2分之1,甲分的的苹果的重量是乙的2倍,甲乙丙各分得这筐苹果的几分之几
- 爱莲说爱莲说:“出淤泥而不染”与“近朱者赤,近墨者黑”是相对的概念,对此持有不同的看法,常常能表现
- 若a<b<0,用作差法比较下列各对数的大小
- 牛二层皮和革一样么?
- 借书 用英语怎么说
- P是圆O上的一动点,弦AB=根号3,PC是角APB的平分线,角BAC=30度.求当角PAC=?时四边形PACB面积最大.最大是几?
- 0.999999是循环数.对还是错
热门考点