Задание:
Постройте программу с этой функцией pred (ch)
Решение:
Var ch: char; beginwrite ('Введите символ: '); read (ch); writeln ('Предыдущий символ: ', pred (ch) , ' | ', 'Следующий символ: ', succ (ch); end.
Знаете другой ответ?
Постройте программу с этой функцией pred (ch)
Var ch: char; beginwrite ('Введите символ: '); read (ch); writeln ('Предыдущий символ: ', pred (ch) , ' | ', 'Следующий символ: ', succ (ch); end.
Знаете другой ответ?