Паскаль шифр цезаряпочему при дешифровке в слове с буквой…

Паскаль шифр цезаряпочему при дешифровке в слове с буквой «в» в результате выдает восклицательный знак то есть не может его дешифровать? program SHIFR_CEZERYA; uses crt; var a,b,c: string; i,j,k,d,g: integer; beginclrscr; writeln ('Шифрование? 1-да,0-нет'); readln (g); writeln ('Исходный текст '); readln (a); writeln ('ключ'); readln (d); c: ='; //Результатb: ='абвгдеежзийклмнопрстуфхцчшщъыьэюя'; for i: =1 to length (a) do //циклfor j: =1 to length (b) dobeginIf g=1 then k: =(j+d) mod 33 else k: =(j-d) mod 33; If k>33 then k: =k-33; if k<0 then k: =k+33; if a[i]=b[j] then c: =c+b[k]; end; writeln (c); readkey; end.