составить программу определения первой и последней цифры N значительного (БЕЙСИК) ПОМОГИТЕ ПОЖАЛУЙСТА!!!

a=число
______________________________________
i = 1
m1:
x = a \ i
i = i * 10
If x > 9 Then GoTo m1
y = a Mod 10
________________________________________
x = первая цифра
у= последняя