1a=b:b=y:input""y:if y goto 1
for i=0to 99c=mod(a+b,10)
a=b
b=c
?c;next