Cоставьте программу записывающую в файл закодированный текст, считывающую его и...

Question

Cоставьте программу записывающую в файл закодированный текст, считывающую его и выполняющую дешифрование, если известен код шифрования - число, указывающее смещение букв в алфавите ( например, код 3 означает, что вместо буквы "а" в зашифрованном тексте указана буква "в"). Дешифрованный текст записать в другой файл.

Comments

Паскаль, друг, паскаль) Он популярен) Нет языка - пиши на паскале)

---

именно паскаль

---

я же говорю, паскаль, сначала забыл указать

Answer 1

Var
  sme: byte;
  arrIn: array of byte;
  boolEncode: boolean;
  arrOut: System.Collections.Generic.List := new System.Collections.Generic.List();

begin
  writeln('1 - encode; 2 - decode');
  readln(sme);
  boolEncode := (sme = 1);
  write('Смещение: ');
  readln(sme);
  arrIn := System.IO.File.ReadAllBytes('out.txt');
  foreach f: byte in arrIn do
    arrOut.Add(f + (boolEncode ? -1 : 1) * sme);
  System.IO.File.WriteAllBytes('out1.txt', arrOut.ToArray());
end.
======================
Алфавит, это, конечно, хорошо, но, бесспорно, будет лучше сделать более универтально: алфавит не только русским будет, ещё пункт. знаки, цЫфры, иврит...:)

Comments

спасибо еще раз

---

Нет, просто это весело, тут слишком скучно. Знаю, юмор своеобразный и редко смешной, но всем же плевать... Почти

---

Не знаю, мои боссы более терпимы, хотя едва ли они меня знают...

---

Да ладно, тут из сложного лишь List, остальное-то - английские слова

---

И я про "цЫфры" говорил)