Язык:
Русский
English
{ Пример программы для процедуры ScrollTo }
{ Компилировать в режиме Windows }
uses WinCrt;
begin
GotoXY(1, 10);
WriteLn('Привет!');
WriteLn('Введите строку и нажмите <ENTER>.');
ReadLn;
ScrollTo(0, 10);
end.
uses WinCrt;
begin
GotoXY(1, 10);
WriteLn('Привет!');
WriteLn('Введите строку и нажмите <ENTER>.');
ReadLn;
ScrollTo(0, 10);
end.