program project1;
 
{$mode objfpc}{$H+}
{$APPTYPE CONSOLE}
 
uses
  {$IFDEF WINDOWS}
  Windows, {for setconsoleoutputcp}
  {$ENDIF}
  Classes;
const
  // ANSI table drawing chars
  tdTopLeft      = #27'(0l'#27'(B';  // ┌
  tdTopCenter    = #27'(0w'#27'(B';  // ┬
  tdTopRight     = #27'(0k'#27'(B';  // ┐
  tdMidLeft      = #27'(0t'#27'(B';  // ├
  tdMidCenter    = #27'(0n'#27'(B';  // ┼
  tdMidRight     = #27'(0u'#27'(B';  // ┤
  tdBottomLeft   = #27'(0m'#27'(B';  // └
  tdBottomCenter = #27'(0v'#27'(B';  // ┴
  tdBottomRight  = #27'(0j'#27'(B';  // ┘
  tdHorzLine     = #27'(0q'#27'(B';  // ─
  tdVertLine     = #27'(0x'#27'(B';  // │    
var
  i: byte;
  s: string;
  ch: Char;
begin
  {$IFDEF WINDOWS}
  SetConsoleOutputCP(CP_UTF8);
  {$ENDIF}
 
  // thanks wp, https://f...content-available-to-author-only...l.org/index.php/topic,36945.msg246843.html#msg246843
  WriteLn('┌──────────────────────┐');
  WriteLn('│ Text in a box        │');
  WriteLn('╘══════════════════════╛');
  WriteLn;
  i := 0;
  for ch := #32 to #255 do begin
    Write(ch, ' ');
    inc(i);
    if i mod 16 = 0 then WriteLn;
  end;
  WriteLn;
  WriteLn(' 1           ');
  WriteLn(' ⌠           ');
  WriteLn(' │ 2 x dx = 1');
  WriteLn(' ⌡           ');
  WriteLn(' 0           ');
  WriteLn;
  WriteLn(' __');
  WriteLn('√ 2 = ', sqrt(2));
  WriteLn; 
 
  // thanks wp, https://f...content-available-to-author-only...l.org/index.php/topic,38910.msg265726.html#msg265726
  // Use Unicode range "Box Drawing" in Lazarus' character map
  WriteLn('┏━━┓  ┏━━┓');
  WriteLn('┛  ┗━━┛  ┗');
  WriteLn;
 
  // Thanks Mr Bee aka @pak_lebah, from ansicrt.pas unit
  for i:= 1 to 10 do s:= s + tdHorzLine;
  WriteLn(tdTopLeft + s + tdTopRight);
 
 
  ReadLn;
end.

cHJvZ3JhbSBwcm9qZWN0MTsKIAp7JG1vZGUgb2JqZnBjfXskSCt9CnskQVBQVFlQRSBDT05TT0xFfQogCnVzZXMKICB7JElGREVGIFdJTkRPV1N9CiAgV2luZG93cywge2ZvciBzZXRjb25zb2xlb3V0cHV0Y3B9CiAgeyRFTkRJRn0KICBDbGFzc2VzOwpjb25zdAogIC8vIEFOU0kgdGFibGUgZHJhd2luZyBjaGFycwogIHRkVG9wTGVmdCAgICAgID0gIzI3JygwbCcjMjcnKEInOyAgLy8g4pSMCiAgdGRUb3BDZW50ZXIgICAgPSAjMjcnKDB3JyMyNycoQic7ICAvLyDilKwKICB0ZFRvcFJpZ2h0ICAgICA9ICMyNycoMGsnIzI3JyhCJzsgIC8vIOKUkAogIHRkTWlkTGVmdCAgICAgID0gIzI3JygwdCcjMjcnKEInOyAgLy8g4pScCiAgdGRNaWRDZW50ZXIgICAgPSAjMjcnKDBuJyMyNycoQic7ICAvLyDilLwKICB0ZE1pZFJpZ2h0ICAgICA9ICMyNycoMHUnIzI3JyhCJzsgIC8vIOKUpAogIHRkQm90dG9tTGVmdCAgID0gIzI3JygwbScjMjcnKEInOyAgLy8g4pSUCiAgdGRCb3R0b21DZW50ZXIgPSAjMjcnKDB2JyMyNycoQic7ICAvLyDilLQKICB0ZEJvdHRvbVJpZ2h0ICA9ICMyNycoMGonIzI3JyhCJzsgIC8vIOKUmAogIHRkSG9yekxpbmUgICAgID0gIzI3JygwcScjMjcnKEInOyAgLy8g4pSACiAgdGRWZXJ0TGluZSAgICAgPSAjMjcnKDB4JyMyNycoQic7ICAvLyDilIIgICAgCnZhcgogIGk6IGJ5dGU7CiAgczogc3RyaW5nOwogIGNoOiBDaGFyOwpiZWdpbgogIHskSUZERUYgV0lORE9XU30KICBTZXRDb25zb2xlT3V0cHV0Q1AoQ1BfVVRGOCk7CiAgeyRFTkRJRn0KCiAgLy8gdGhhbmtzIHdwLCBodHRwczovL2YuLi5jb250ZW50LWF2YWlsYWJsZS10by1hdXRob3Itb25seS4uLmwub3JnL2luZGV4LnBocC90b3BpYywzNjk0NS5tc2cyNDY4NDMuaHRtbCNtc2cyNDY4NDMKICBXcml0ZUxuKCfilIzilIDilIDilIDilIDilIDilIDilIDilIDilIDilIDilIDilIDilIDilIDilIDilIDilIDilIDilIDilIDilIDilIDilJAnKTsKICBXcml0ZUxuKCfilIIgVGV4dCBpbiBhIGJveCAgICAgICAg4pSCJyk7CiAgV3JpdGVMbign4pWY4pWQ4pWQ4pWQ4pWQ4pWQ4pWQ4pWQ4pWQ4pWQ4pWQ4pWQ4pWQ4pWQ4pWQ4pWQ4pWQ4pWQ4pWQ4pWQ4pWQ4pWQ4pWQ4pWbJyk7CiAgV3JpdGVMbjsKICBpIDo9IDA7CiAgZm9yIGNoIDo9ICMzMiB0byAjMjU1IGRvIGJlZ2luCiAgICBXcml0ZShjaCwgJyAnKTsKICAgIGluYyhpKTsKICAgIGlmIGkgbW9kIDE2ID0gMCB0aGVuIFdyaXRlTG47CiAgZW5kOwogIFdyaXRlTG47CiAgV3JpdGVMbignIDEgICAgICAgICAgICcpOwogIFdyaXRlTG4oJyDijKAgICAgICAgICAgICcpOwogIFdyaXRlTG4oJyDilIIgMiB4IGR4ID0gMScpOwogIFdyaXRlTG4oJyDijKEgICAgICAgICAgICcpOwogIFdyaXRlTG4oJyAwICAgICAgICAgICAnKTsKICBXcml0ZUxuOwogIFdyaXRlTG4oJyBfXycpOwogIFdyaXRlTG4oJ+KImiAyID0gJywgc3FydCgyKSk7CiAgV3JpdGVMbjsgCgogIC8vIHRoYW5rcyB3cCwgaHR0cHM6Ly9mLi4uY29udGVudC1hdmFpbGFibGUtdG8tYXV0aG9yLW9ubHkuLi5sLm9yZy9pbmRleC5waHAvdG9waWMsMzg5MTAubXNnMjY1NzI2Lmh0bWwjbXNnMjY1NzI2CiAgLy8gVXNlIFVuaWNvZGUgcmFuZ2UgIkJveCBEcmF3aW5nIiBpbiBMYXphcnVzJyBjaGFyYWN0ZXIgbWFwCiAgV3JpdGVMbign4pSP4pSB4pSB4pSTICDilI/ilIHilIHilJMnKTsKICBXcml0ZUxuKCfilJsgIOKUl+KUgeKUgeKUmyAg4pSXJyk7CiAgV3JpdGVMbjsKCiAgLy8gVGhhbmtzIE1yIEJlZSBha2EgQHBha19sZWJhaCwgZnJvbSBhbnNpY3J0LnBhcyB1bml0CiAgZm9yIGk6PSAxIHRvIDEwIGRvIHM6PSBzICsgdGRIb3J6TGluZTsKICBXcml0ZUxuKHRkVG9wTGVmdCArIHMgKyB0ZFRvcFJpZ2h0KTsKICAgICAgICAgICAgICAgICAgICAgICAgIAogCiAgUmVhZExuOwplbmQu