• Расшифруйте слово  НУЛТХСЁУГЧЛВ , закодированное с помощью шифра Цезаря , если известно , что каждая буква исходного текста  заменяется третьей после неё буквой 

Ответы 1

  • // PascalABC.NET 3.1, сборка 1213 от 04.04.2016begin  var keyword:='АБВГДЕЁЖЗИЙКЛМНОПРСТУФХЦЧШЩЪЫЬЭЮЯАБВ';  var encoded:='НУЛТХСЁУГЧЛВ';  var decoded:='';  for var i:=1 to encoded.Length do    decoded+=keyword[keyword.LastIndexOf(encoded[i])-2];  Writeln(decoded)end.Результат выполнения программы:КРИПТОГРАФИЯ
    • Автор:

      natalia20
    • 5 лет назад
    • 0
  • Добавить свой ответ

Еще вопросы

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years