Question

编一个程序，利用for语句，打印一个如下形式的一个菱形，行数从键盘输入。 *

编一个程序，利用for语句，打印一个如下形式的一个菱形，行数从键盘输入。
*
***
*****
*******
*****
***
*
用c#语言编写

Answer 1

Dim L As Integer
L = InputBox("?", "Input", "9")
If L Mod 2 = 0 Then L = L + 1
If L <= 1 Then Exit Sub
Sk = String(L, " ")
For I = 1 To L Step 2
    lSk = Left(Sk, Int((L - I) / 2))
    PStr = lSk & String(I, "*")
    Print PStr
Next
For I = L - 2 To 1 Step -2
    lSk = Left(Sk, Int((L - I) / 2))
    PStr = lSk & String(I, "*")
    Print PStr
Next

手头只装了VB，算法一样，以资参考。