Напишите программу, движения точки по экрану в заданном направлении с заданным шагом. Исходное положение точки (189,174), с шагом 8, горизонтально влево — Pascal(Паскаль)

uses crt,graph;
var gd,gm: integer; x,y: word;
begin
gd:=detect;
initgraph(gd,gm,'');
x:=189;
y:=174;
repeat
putpixel(x,y,15);
delay(100);
putpixel(x,y,0);
x:=x-8;
until x<=8;
closegraph;
end.