срочно программу в паскаль. решить числовой ребус одинаковые буквы означают одинаковые цифры кот+кто=ток

Спасибо, я предпочитаю девочек

Ну просто ты офигенный чувак

"Чувак" на Востоке - это слово, обозначающее кастрированного верблюда или барана. Так что давайте поаккуратнее с сомнительными комплиментами.

Хорошо больше не буду.

Вот это правильная мысль. Чтобы не парится, тут просто есть красненькое сердечко для выражения благодарности. Если, конечно, таковая возникает.

PascalABC.NET 3.4.2, сборка 1857 от 05.11.2018Внимание! Если программа не работает, обновите версию!

begin

 for var K := 1 to 9 do

   for var O := 0 to 9 do

     for var T := 1 to 9 do

       if 100 * K + 10 * O + T + 100 * K + 10 * T + O =

           100 * T + 10 * O + K then

         $'{K}{O}{T}+{K}{T}{O}={T}{O}{K}'.Println

end.

459+495=954