Four Number Game by *yuko*

integer a(4)
do1;read(*,*)a
do2;print'(9(i0x))',a;goto(1)sum(a)+1
2 a=abs(cshift(a,1)-a)
1 print*;end

Note that non-ascii characters in the above source code will be escaped (such as \x9f).

download

return to the top page