11 lines
123 B
ObjectPascal
11 lines
123 B
ObjectPascal
|
uses CRT;
|
||
|
|
|
||
|
|
begin
|
||
|
|
GotoXY(60,15);
|
||
|
|
Print('PascalABC.NET');
|
||
|
|
HideCursor;
|
||
|
|
Sleep(1000);
|
||
|
|
ShowCursor;
|
||
|
|
Sleep(1000);
|
||
|
|
end.
|