Imports System

Public Module Module1

    Public Sub Main()

        dim n1 as integer

        dim n2 as integer

        dim n3 as integer

        dim n4 as integer

        dim n5 as integer

        dim avgscore as integer 

        Console.WriteLine("Please input 5 random numbers")

        n1 = Console.ReadLine()

        n2 = Console.ReadLine()

        n3 = Console.ReadLine()

        n4 = Console.ReadLine()

        n5 = Console.ReadLine()

        console.Writeline("The total of these 5 number is " & n1 +n2 +n3 +n4 +n5)

        avgscore= (n1 + n2 + n3 + n4 + n5) /5

        console.writeline(" The average of these numbers were " & avgscore)

    End Sub

End Module