Вот блок-схема, надеюсь помог)
Понятно, что 90 = Р и 93 = С - все четыре слова заканчиваются на эти буквы. Теперь смотрим: есть два слова, начинающиеся на одну букву: МАРС и МОРС. Ищем среди последовательностей две, которые тоже начинаются на одинаковый код. Это 80 84 90 93 и 80 05 90 93. Значит, 80 = М
Теперь ищем последовательности для МАРС и БАРС - у них совпадает вторая буква. Это 80 05 90 93 и 10 05 90 93, откуда имеем 05 = А и 10 = Б, а код 84 = О
Оставшаяся последовательность 87 62 90 93 для слова ПИРС даёт нам буквы 87 = П и 62 = И
Таким образом, СИРОП кодируется так:
93 62 90 84 87
//PascalABC.NET 3.1 сборка 1239
uses GraphABC;
const
n = 4;
begin
Window.CenterOnScreen;
var h := 100;
Window.SetSize(h * n, h * n);
Pen.Width := 3;
for var i := 1 to n - 1 do
begin
Pen.Color := clRandom;
Polyline((h * i, h * 0), (h * n, h * (n - i)), (h * (n - i), h * n), (h * 0, h * i), (h * i, h * 0));
end;
end.
предлагаю писать слова наооборот.Например:(я напишу,,я отправляюсь на Марс,и прибуду в час ночи,,)так это будет выглядеть:,,ичон сач в удубрип и ,сарМ ан ьсюялварпто я,,. Удачи))