Предмет: Другие предметы, автор: robotmax098

Разгадайте числововй ребус KKK= BK*AC. запрограммируйте ваши рассуждения


robotmax098: решить в паскале

Ответы

Автор ответа: smeshsonja
0
квас просто видеш звезда значит буквы надо периставить

smeshsonja: в каком смысле
robotmax098: в паскале
smeshsonja: будеш другом
robotmax098: окей
smeshsonja: добавь
smeshsonja: а как добовлять
robotmax098: прими заявку
smeshsonja: принил(а)
smeshsonja: тебя как звать
smeshsonja: а лет скоко
Автор ответа: armen98
0
Я не крутой прогер, и, поэтому вот решение тупым перебором.
program ttt;
var k,a,b,c,i:longint;
begin
for k:=1 to 9 do begin

for b:=1 to 9 do begin

for a:=1 to 9 do begin

for c:=0 to 9 do begin

if (100*k+10*k+k = (10*b+k)*(10*a+c)) then writeln(k,k,k,'=',b,k,'*',a,c);

end
end
end

end
end.

Немножко неразборчиво написано, потому на сайте нет функции вставки программного кода. Так что извини.


robotmax098: спасибо
armen98: Пожалуйста.
Похожие вопросы
Предмет: Математика, автор: ольга1590
Предмет: Математика, автор: fontikgalkina
Предмет: Физика, автор: Kiryasar
Предмет: Английский язык, автор: alexop09