Program Example6; uses Crt; { Program to demonstrate the GotoXY function. } begin ClrScr; GotoXY(10,10); Write('10,10'); GotoXY(70,20); Write('70,20'); GotoXY(1,22); end.