9983.times{i:it+17;n:i;for(a:i;math::abs(a-n%10)>5;n/=10)a=n%10;n>0||i.p;}