змінні
c, с2, великі, маленькі : рядок;

Процедура Змінити();
Початок процедури
  ввід с;

  Великі := 'АБВГ...Я';
  Маленькі := 'абвг...я';

  цикл від 1 до довжина(рядка с) з ітератором і робити,
    цикл від 1 до довжина(рядка великі) з ітератором j робити
      якщо с[ i ] = великі[ j ] то с2[ i ] := меленькі[ j ];

  ...
  //і так само з маленькими
  ...

  вивід с2;
кінець процедури;