B := 187;
Writeln('201: ', #201); {вывод символа по его коду}
Writeln('205: ', chr(205));{возвращает символ, номер которого в ASCII таблице задан параметром}
Writeln('187: ', chr(B)); { }
Write('186: ', #186, #13, #10);{ вывод символов #13 (перенос строки) и #10 (возврат каретки)}
Write('188: ', #188); {}
Write(#$0d,#$0a,'200: ',#200);{символы с №, который задан числом в 16-й системе: $0d - 13, $0a - 10}
MakeWindow(10, 10, 40, 20);{построение окошек по заданным координатам}