ait := array(0 .. 9,[(0)=8,(1)=1,(2)=7,(3)=2,(4)=3,(5)=4,(6)=0,(7)=9,(8)=6,(9
)=5]);