 Программа просит ввести 4 символа и выводит их коды через пробел

var a,b,c,d:char;beginwriteln('Введите 4 символа:');readln(a,b,c,d);writeln(ord(a),' ',ord(b),' ',ord(c),' ',ord(d));end.