Program P15;
 { Studierea funcţiei chr }
var i : integer;  { număr de ordine }
    x : char;     { caracter }

begin
 readln(i); x:=chr(i); writeln(x);
 readln(i); x:=chr(i); writeln(x);
 readln(i); x:=chr(i); writeln(x);
 readln(i); x:=chr(i); writeln(x);
end.
