Криптографическая соль, метод Виженера

[miwail]

Криптографическая соль, метод Виженера

Доброго времени суток.
Имеется процедура для шифрования строки методом Виженера.

procedure vizhener();
var i,j:integer;
    out_str, in_str, key:string;
begin
  clrscr;
  writeln('Шифрування методом Віженера');
  writeln('Введіть рядок який необхідно зашифрувати:');
  readln (in_str);
  writeln('Введіть ключ шифрування:');
  readln(key);
  
  j:=0;
  for i:=1 to length(in_str) do begin
    inc(j);
    if j>length(key) then j:=1;
    out_str:=out_str+chr((pos(in_str[i], alph) + pos(key[j], alph)) mod length(alph)+ord('а'));
    
  end;
  writeln('Зашифрований рядок:', out_str);
  writeln('Для виходу в головне меню натисніть будь яку клавішу...');
  readln;

end;

По заданию необходимо усилить шифрование криптографической солью. Подскажите как это реализовать при шифровании данным методом?

_______
PS:
Правильно ли я понимаю:
к ключу нам надо добавить случайную строку ? и потом проводить шифрование ?