这个嵌套循环该怎么写?

来源：百度知道 编辑：UC知道 时间：2024/06/07 06:54:07
在控制台应用程序里面用For...Next嵌套循环,用Console.Write()方法在控制台界面打印如下两个图案.代码该怎么写,谢谢!
(a)
*
**
***
****
*****
******
*******
********

(b)
*
**
***
****
*****
******
*******
********
大家可能看到B图跟A图一样,其实我在提出这个问题的时候写的不是这个样子的,结果提出问题后就变成这样的了,B图应该第一行7个空格加一个*号,第二行6个空格加两个*号,第三行是5个空格加三个*号,依此例推,最一行是没有空格只有8个*号.

Sub Main()
Dim i, j As Integer
For i = 1 To 7
For j = 1 To i
Console.Write("*")
Next j
换行(语句忘记了)
Next i
End Sub
Sub Main()
Dim i, j ,k As Integer
dim str as string
For i = 1 To 7
str=""
for k=i+5 to 0 step -1
str=str+"空格"
next k
For j = 1 To i
Console.Write(str&"*")
Next j
换行(语句忘记了)
Next i
End Sub
控制台语法不是很熟悉，不过意思到了，希望对你有所帮助