Uses WinCrt; { В модуле Crt аналогом является процедура GotoXY } Var C : PChar; Begin CursorTo(15, 10); WriteLn('Привет!'); End.