program Dzialania_na_danych_typu_char;

var a,b,c,d,e,f,g,h,i,j,k:char;
begin
   a:='A';
   b:='l';
   c:='a';
   j:=#32; {spacja}
   d:='m';
   e:='a';
   j:=#32; {spacja}
   f:=#107;
   g:=#111;
   h:=#116; 
   i:=#97;
   k:=#10; {nowa linia}
   writeln(a,b,c,j,d,e,k,f,g,h,i);
   readln;
end.