Предмет: Информатика,
автор: like43
Антон увлекся кодированием и закодировал слово с помощью букв русского алфавита.В итоге он получил следующие слово: ЕЖЁЖЗЖЬ. Чтобы раскодировать слово,необходимо каждую букву заменить на вторую за ней в русском алфавите( А-В,В-Д...,Ю-А).Известно,что данный алгоритм нужно применить 4 раза подряд.
Ответы
Автор ответа:
6
Для решения этой задачи можно воспользоваться простенькой программой, которая делает все сдвиги:
PascalABC.NET 3.4.2, сборка 1933 от 01.04.2019
begin
var alph := 'АБВГДЕЁЖЗИЙКЛМНОПРСТУФХЦЧШЩЪЫЬЭЮЯ'.ToCharArray;
var w := ReadlnString;
for var i := 1 to 8 do
for var x := 1 to w.Length do
begin
var ind := alph.IndexOf(w[x]);
w[x] := alph[ind + 1 = 33 ? 0 : ind + 1];
end;
w.Println
end.
Результат в приложении.
Ответ: МОНОПОД
Приложения:

Интересные вопросы
Предмет: Информатика,
автор: rusgameplat
Предмет: Другие предметы,
автор: natapan2008
Предмет: Физика,
автор: dayn06883
Предмет: Математика,
автор: Аноним
Предмет: Алгебра,
автор: Tima5016321