Это в pascal abc: 1) с клавиатуры вводят символ. составте програму, которая выводит два следуйщих символа. 2) с клавиатуры вводят код символа. составте програму, которая выводит предыдущий символ. это в pascal abc

1)

Program n1;
Uses CRT;
Var a: char;
b,c: integer;
begin
Writeln('Vvedite simvol');
Readln(a);
b:=ord(a)+1;
c:=ord(a)+2;
Writeln(chr(b),' ',chr(c));
readln
end.

2)

Program n1;
Uses CRT;
Var a: integer;
begin
Writeln('Vvedite kod');
Readln(a);
Writeln(chr(a-1));
readln
end.