How many positive 3 -digit numbers A⎯⎯⎯B⎯⎯⎯C⎯⎯⎯ are such that the product of the 2 -digit numbers A⎯⎯⎯B⎯⎯⎯ and B⎯⎯⎯C⎯⎯⎯ equals A⎯⎯⎯B⎯⎯⎯C⎯⎯⎯ ?
I read your question to mean: (A*B) * (B*C) =A*B*C. If that is the case, then we have:
a=1;b=0;c=0;p=0; cycle:d=a*100+b*10+c;if((a*b) *(b*c)==a*b*c, goto loop, goto next); loop:printd," ",;p=p+1; next:c++;if(c<10, goto cycle, 0);c=0;b++;if(b<10, goto cycle, 0);b=0;c=0;a++;if(a<10, goto cycle,0);print"Total = ",p
OUTPUT = 252 such numbers.
