A:=0.
1to:99 do:[:n|n\\2>(n\\11\\n)and:[A:=A+1].stdout<<'N='<<n<<',A='<<A;nl]