Составить программу ,которая запрашивает у пользователя код символа и выводит на экран символ с кодом на 1 больше.

Var
    i: integer;

begin
    write('Введите код символа = ');
    readln(i);
    writeln(chr(i + 1));
end.