Напишите примеры операций над символами, как в программе паскаль для команд: chr (x), ord (x), pred (x), succ (x), !

Существуют специальные таблицы кодировки символов, в которых каждому символу соответствует свой уникальный номер. на фото часть одной из таких таблиц. а ниже программка на паскале, иллюстрирующая работу этих функций: program aaa; //chr (x), ord (x), pred (x), succ (x), var x: integer; y,z: string;   begin //присвоим переменной у значение символа под номером 102: y: =chr(102); writeln('chr(102)= ',y); //присвоим переменной x номер позиции символа а в таблице кодировки windows ascii: x: =ord('f');   writeln('ord(''f'')= ',x); //а теперь возьмем символ алфавита "ф":   x: =ord('ф'); //  writeln('ord(''ф'')= ',x); //теперь нам нужен символ, следующий, например, за символом ю: y: =succ('ю'); writeln('succ(''ю'')= ',y); //или символ, предществующий символу я: y: =pred('я'); writeln('pred(''я'')= ',y); end. результат работы программы: chr(102)= f ord('f')= 102 ord('ф')= 212 succ('ю')= я pred('я')= ю

Var   x,y: real;   i: integer; begin   y: =0;   write('x= ');   read(x);   for i: =1 to 11 do y: =i+y*x;   writeln('y= ',y) end. пример x=3.6 y= 700939.22164521