369 by *yuko*

for i=1to 1e3k=0:for j=0to 2if!mod(mod(i/10^j,10)-1,3)<2k=1:?"Clap";
next:if!k?i;
?next

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

download

return to the top page