var i,j=10L j=readLine drop 2 toLong;print(0D) while({i=i%j*10 i}>10)print(i/j)
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page