Advertisement
kostes

5b

Oct 22nd, 2018
102
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.06 KB | None | 0 0
  1. var
  2. a:char;
  3. begin
  4. readln(a);
  5. write(chr(ord(a)+1));
  6. end.
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement