Identify and correct the errors in the code snippet below

(9 Marks)

Dim nama as string

Dim total, mark(3), average as float

Dim gender as Boolean

name = inputbox(What is your name)

for countmark = 1 to 3

mark(countmark) = inputbox(Mark)

total = total + mark(countmark)

next

gender = text1.caption

average = total / 3

messagebox.show(Average mark is = & total &,Marks. Vbokonly+vbinformation)

Note : Underline or circle the errors and rewrite the correct code in the space below