Imports Microsoft.VisualBasic
Dim house(size) As Integer
Dim reactime(size) As Decimal
Dim student(size) As String
Console.WriteLine("Please insert student's house.(Saturn = 1, Mars = 2.")
house(i) = Console.ReadLine
Console.WriteLine("Please insert student's name.")
name(i) = Console.ReadLine
Console.WriteLine("Please insert student's age.")
age(i) = Console.ReadLine
Console.WriteLine("Please insert student's reaction time.")
reactime(i) = Console.ReadLine
Console.WriteLine("Please insert student's name.")
name(i) = Console.ReadLine
Console.WriteLine("Please insert student's age.")
age(i) = Console.ReadLine
Console.WriteLine("Please insert student's reaction time.")
reactime(i) = Console.ReadLine
student(i) = house(i) / name(i) / age(i) / reactime(i)