Dynamic 免费Pascal:控制台文本修改(初学者)

Dynamic 免费Pascal:控制台文本修改(初学者),dynamic,text,console,edit,freepascal,Dynamic,Text,Console,Edit,Freepascal,我的问题很简单,我想知道是否可以使用免费的pascal(没有delphi或其他任何东西)使用函数write()来“编辑”控制台中编写的文本(或者其他函数也可以这样做) 例如: Program Test; Begin Writeln('This is a test'); FUNCTION('This test has been edited'); End. 输出: This test has been edited 我知道我可以这样做: Program Test; Uses crt; Be

我的问题很简单,我想知道是否可以使用免费的pascal(没有delphi或其他任何东西)使用函数write()来“编辑”控制台中编写的文本(或者其他函数也可以这样做)

例如:

Program Test;
Begin
 Writeln('This is a test');
 FUNCTION('This test has been edited');
End.
输出:

This test has been edited
我知道我可以这样做:

Program Test;
Uses crt;
Begin
 Writeln('This is a test');
 ClrScr;
 Writeln('This test has been edited');
End.
但我不想使用CLRSC

谢谢您的帮助。

尝试
GotoXY(X,Y)
功能

 Writeln('This is a test');
 Readln;
 GotoXY(1, 1);
 Writeln('This test has been edited');
 Readln;