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