Информатика 10 класс.. составьте программу, которая: а) определяет коды двух введенных с клавиатуры символов;

A) Program PRIMER;
Uses crt;

var a, b: char;

begin
  write('Введите первый символ a = ');
  readln(a);

  write('Введите второй символ b = ');
  readln(b);
 
  writeln;
  write('Код символа a = ', ord(a), ', код символа b ', ord(b));
 
readln;
end.

в)
Program primer2;
uses crt;

var a,b,c: char;

begin
     write('Введите чила a, b, c = ');
     readln(a,b,c);
    
     writeln('Результат сцепления: ', a+b+c);
end.