In this VB.net Program write in Algorithm(Pseudocode). Thank you Module VBModule Sub Main() 'this loop is used to print upper portion of shape For i As integer = 1 To 7 Step 2 For space As integer = 1 To (7-i) Step 1 Console.Write(" ") Next For j As integer = 1 To (2*i-1) Step 1 Console.Write("*") Next Console.WriteLine() Next Dim i As integer = 5 'this loop is used to print upper portion of shape while i>=1 For space As integer = 1 To (7-i) Step 1 Console.Write(" ") Next For j As integer = 1 To (2*i-1) Step 1 Console.Write("*") Next Console.WriteLine() i=i-2 End while End Sub End Module
In this VB.net Program write in
Module VBModule
Sub Main()
'this loop is used to print upper portion of shape
For i As integer = 1 To 7 Step 2
For space As integer = 1 To (7-i) Step 1
Console.Write(" ")
Next
For j As integer = 1 To (2*i-1) Step 1
Console.Write("*")
Next
Console.WriteLine()
Next
Dim i As integer = 5
'this loop is used to print upper portion of shape
while i>=1
For space As integer = 1 To (7-i) Step 1
Console.Write(" ")
Next
For j As integer = 1 To (2*i-1) Step 1
Console.Write("*")
Next
Console.WriteLine()
i=i-2
End while
End Sub
End Module
Step by step
Solved in 2 steps