dim NoOfStudents as Integer
dim NoOfCandidates as Integer
Console.Writeline("Hello, please enter the name of the tutor group")
TutorGroup = Console.Readline()
Console.Writeline("Please enter the number of pupils in " & TutorGroup)
NoOfStudents = Console.Readline()
Console.Writeline("Please enter the number of candidates running")
NoOfCandidates = Console.Readline()
If NoOfCandidates > 4 then
Console.Writeline("That is not a valid input")
Elseif NoOfCandidates < 0 then
Console.Writeline("That is not a valid input")
dim NamesOfCandidates(NoOfCandidates) as String
Console.Writeline("Please enter the names of the candidates")
For count = 0 To NoOfCandidates-1
NamesOfCandidates(count) = Console.Readline()