program ArrayOfCharExample;
var
ArrayOfChar: array[1..10] of char;
begin
ArrayOfChar := 'X';
Writeln('ArrayOfChar:', ArrayOfChar,'X');
end.
cHJvZ3JhbSBBcnJheU9mQ2hhckV4YW1wbGU7CnZhcgogIEFycmF5T2ZDaGFyOiBhcnJheVsxLi4xMF0gb2YgY2hhcjsKYmVnaW4KICBBcnJheU9mQ2hhciA6PSAnWCc7CiAgV3JpdGVsbignQXJyYXlPZkNoYXI6JywgQXJyYXlPZkNoYXIsJ1gnKTsKZW5kLg==