vb数字金字塔1 121 12321一直到9For i = 1 To 9For j = 1 To iPrint j;Next jFor j = i - 1 To 1 Step -1Print j;Next jPrint这个代码怎么改能变如图Next i

来源:学生作业帮助网 编辑:作业帮 时间:2024/05/08 12:01:21
vb数字金字塔1 121 12321一直到9For i = 1 To 9For j = 1 To iPrint j;Next jFor j = i - 1 To 1 Step -1Print j;Next jPrint这个代码怎么改能变如图Next i

vb数字金字塔1 121 12321一直到9For i = 1 To 9For j = 1 To iPrint j;Next jFor j = i - 1 To 1 Step -1Print j;Next jPrint这个代码怎么改能变如图Next i
vb数字金字塔1 121 12321一直到9
For i = 1 To 9
For j = 1 To i
Print j;
Next j
For j = i - 1 To 1 Step -1
Print j;
Next j
Print这个代码怎么改能变如图
Next i

vb数字金字塔1 121 12321一直到9For i = 1 To 9For j = 1 To iPrint j;Next jFor j = i - 1 To 1 Step -1Print j;Next jPrint这个代码怎么改能变如图Next i
自己看图,是不是这样,我发了两个小时才调好的,我也才学,代码如下:
Private Sub Form_Click()
Dim a(1 To 5) As Integer
  For j = 1 To 5
  a(j) = j
  Next j
For i = 1 To 5
Print Tab(30 - i * 3);
  For j = 1 To 2 * i - 1
  If j > i Then
   Print a(2 * i - j);
  Else
  Print a(j);
  End If
  Next j
Next i
End Sub

VB中数字金字塔 样式为:1 121 12321 1234321 以此类推,请问这个程序该怎么设计 VB数字倒金字塔程序 输入1-9之间的数字,形成以下倒金字塔7777777777777666666666665555555554444444333332221 vfp数字金字塔的程序 1 121 12321 vB l中 用 WHILE 来做 121 12321 1234321 金字塔求答!急要用WHILE! VB 用*表示金字塔 vb数字金字塔1 121 12321一直到9For i = 1 To 9For j = 1 To iPrint j;Next jFor j = i - 1 To 1 Step -1Print j;Next jPrint这个代码怎么改能变如图Next i 求用VB程序解决~生成数字金字塔,要求一个等腰三角形金字塔尖朝下,另一个朝上,中间数字为1,向两个方向递推增加.最多到数字9.要求数字前后不能有空格. VB中 用*号表示 金字塔 金字塔数字之美? 求金字塔?中的数字 编程打印出以下数字金字塔图案,其中图案的层数在程序运行时由键盘输入 1 121 12321 1234321 求VB代码_数字金字塔如图,一直到9.数字之间有空格.11 2 11 2 3 2 11 2 3 4 3 2 11 2 3 4 5 4 3 2 1打错了…不是的,不是杨辉三角,每一行是递增后递减的数字 如何用vb程序写一个由数字组成的三角形,一行为1,二为121,三行12321,四行1234321,五行12321……程序 pascal数字金字塔 急死了!Description 输入正整数n,输出n层数字金字塔.Input 只有一行且只有一个正整数:n (1 .谁知道埃及金字塔的神奇数字谢谢 数字金字塔 有会的吗 VB中,有1-39个数字,任意随机选择其中某些数字(数量不限)然后两两组合,请问用VB该怎么写程序? 如果数+学+金+字+塔=30,当算式成立“数字金字塔”代表的五位数是什么?塔 字塔 金字塔 学金字塔 +数学金字塔=数学金字塔