è possibile in FreeBASIC?

il codice è il seguente:

codice:
cls
dim a(5) as string

input "->",a(0),a(1)
if .......
end if
il programma mi crasha :\
Scusate per la questione stupida ma sono un principiante della programmazione