标有号码1,2,3,4,5,6,7,8的8个球,有一个是最轻的,写出挑出最轻球的程序

INPUT a[1],a[2],a[3],a[4],a[5],a[6],a[7],a[8]
min:=a[1]
WHILE ia[i] Then
min=a[i]
END IF
WEND
PRINT min
END
你们高中是教的BASIC语言吧.让人逻辑思维很混乱..