Криптография, Причем, примитивная :) Опции

[Дюдя]

Решил написать примитивный шифровальщик
Идея такая: вводим слово, а программа сдвигает каждую букву вперед по алфавиту.
"А" меняется на "Б", "Б" на "В" и т.д.
Но беда - не сообразил, как сделать. Натолкните на верную мысль, пожалуйста

[volvo]

Хорошо. "Я" на что меняться будет? Опять на "А"?

Тогда легче просто описАть строку - алфавит и работать с ней:

Const
  alpha: string = 'АБВ...ЭЮЯ';
  { естественно, строка должна быть заполнена ВСЕМИ символами алфавита }
...
  readln(s);
  for i := 1 to length(s) do
    s[i] := alpha[(pos(s[i], alpha) mod Length(alpha)) + 1];

Bokul, а то, что множество символов кириллицы разорвано между 'п' и 'р', это ничего? У тебя там будет сбой