var
C: Char;
begin
//no backslash escapes in Delphi;
//characters go by #code
//'' for a single quote
C := '''';
WriteLn('quote is ', C);
C := #0; //null character
C := #8; //backspace
C := #9; //horizontal tab
C := #10; //new line
C := #13; //carriage return
//hex code: symbol A
C := #$41;
WriteLn('c is ', C);
end.