Пользователь вводит символ, и получает его ASCII код.
Решение:
| 1 2 3 4 5 6 7 8 9 10 | program characters_and_strings_4; uses crt; var c: char; begin clrscr; write(‘Символ > ‘); read(c); write(‘ASCII код символа ‘, c, ‘: ‘, ord(c)); readkey; end. |
