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...

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