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