RosettaCodeData/Task/Terminal-control-Hiding-the-cursor/PascalABC.NET/terminal-control-hiding-the-cursor.pas

uses CRT;

begin
  GotoXY(60,15);
  Print('PascalABC.NET');
  HideCursor;
  Sleep(1000);
  ShowCursor;
  Sleep(1000);
end.