Задание:
Решите ребус: КОТ-К=КТО Найдите все решения
Решение:
Я решала с помощью программирования. Составила программу Program pic; Var k,o,t: integer; beginFor k: =1 to 9 dofor t: =1 to 9 dofor o: =1 to 9 doif (100*k+10*o+t) -k=100*k+10*t+o then writeln (100*k+10*o+t,'-',k,'=',100*k+10*t+o); readln; end. Получились ответы: 921-9=912932-9=923943-9=934954-9=945965-9=956976-9=967987-9=978
Знаете другой ответ?