Ответ:
Объяснение:
Во-первых, если Вы пишете в PascalABC.NET, можно писать это проще и короче, не заморачиваясь с типами данных.
begin
var c := ReadlnChar('Введите символ s');
var s := OrdAnsi(c);
Writeln('Код введённого символа - ', s)
end.
Во-аторых, если Вы все же хотите в современном PascalABC.NET писать, как в Delphi образца 2005 года, пишите хотя бы правильно:
var
s:integer;
c:char;
begin
writeln('Введите символ s');
readln(c);
s:= ordAnsi(c);
writeln('Код введённого символа - ', s);
end.