Cделать программу на паскале
Определить значения следующих функций:
CHR(68)
ORD('d')
PRED(1)
SUCC('Я')

beginwriteln(CHR(68));   // Dwriteln(ORD('d'));  // 100writeln(PRED(1));   // 0writeln(SUCC('Я')); // аend.