Помогите решить ребус на паскале, пожалуйста: A+AB+ABC=BCB

Помогите решить ребус на паскале, пожалуйста: A+AB+ABC=BCB
Гость
Ответ(ы) на вопрос:
Гость
uses crt; var a,b,c: integer; begin for a:=1 to 9 do     for b:=1 to 9 do         for c:=0 to 9 do         if a+10*a+b+100*a+10*b+c=100*b+10*c+b            then writeln(a,' ',b,' ', c); end.
Не нашли ответ?
Ответить на вопрос
Похожие вопросы