Процедура GotoXY используется в Pascal для перевода курсора в нужную позицию на экране. Для этой процедуры указываются координаты. После указания процедуры GotoXY в коде программы сообщение будет выводиться на экран в тех координатах, которые мы указали.

program number5;
uses crt;
var x ,y: integer;
begin
clrscr;
Writeln (‘Введите координаты’);
readln (x, y);
gotoxy(x, y);
Writeln ('Выводим текст в точке с заданными координатами');
readln
end.

В строке №3 записываем переменные «x» и «y» для хранения координат.

Строка №7. Вводим 2 числа, которые впоследствии будут являться координатами. Обратите внимание, что в процедуре Readln записано 2 переменные. Это означает, что мы можем ввести с клавиатуры 2 числа.

В строке №8 записываем процедуру Gotoxy. Эта процедура переводит курсор в позицию, для которой задаются координаты в скобках. Максимальная координата «x» равна 80, а максимальная координата «y» равна 38 (для Free Pascal). Т.е. в окне вывода информации помещается 38 строк и 80 символов в каждой строке. Таким образом, курсор будет установлен в точку с координатами, которые мы введем с клавиатуры (в строке №7).

Строка №9. Выводим на экран сообщение. Оно будет выведено на экран в том месте, которое соответствует координатам, введенным нами с клавиатуры.

Давайте наберем программу в Паскале. Программа буде иметь вид:

Запускаем программу и вводим 2 координаты (я ввел 20 и 20), нажимаем Enter.

Я вводил координаты с помощью клавиши пробел. Т. е. ввожу первую координату, нажимаю пробел, ввожу вторую координату, нажимаю Enter. Можно вводить координаты через Enter. Т. е. вводим первую координату, нажимаем Enter, вводим вторую координату, нажимаем Enter.