С клавиатуры вводят символ .Составьте программу , которая выводит два следующих символа. На языке pascal.

//PascalABC.Net 3.2
begin
var ch:=ord(readchar('Введите символ: '));
print ('Следующие 2 символа:', chr(ch+1), chr(ch+2));
end.