a=102;b=1;if(a%b==1, goto3,goto4);printa,b;a=a+10;b++;if( b<10, goto2, goto7);a=a+10;b=1;if(a<10000, goto2, discard=0;
I found 6 such numbers:
162 7, 322 3, 622 3, 862 7, 922 3, 982 9 - The first number is the "dividend" and the smaller number is the "divisor".