<?for($x=fgets(STDIN);$x>print"$x\n";$x=$x%2?$x*3+1:$x/2);
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page