EKG Sequence by *yuko*

real a(199);j=1;1 print'(i0)',j;a(j)=1;i=j;do j=1,141;do k=2-1/i,i;if(mod(i,k)+mod(j,k)+a(j)<1)goto1;enddo;enddo;end

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

download

return to the top page