[Decoding]

Запиши алфавит в массив

a: array[1..33] of char;

a[1] := 'а';
и т.д.

и работай с этим массивом.