b:=(x:=File standardInput readLine split map(asNumber))pop;a:=x pop;100repeat(write(b=(a+a=b)%10," "))
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page