a=0 do 8 a=translate(a,10,01)a end say a