falling number by pooq

int n;int a;int m;int f;for n=10to 9876{m=n;f=0;while m>9{a=m/10;if m mod 10>=a mod 10{f=1;}m=a;}if f<1{print n;}}

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

download

return to the top page