Составьте программу, осуществляющую поиск фамилий двух людей, живущих в разных городах по одному адресу.

g:=detect;

InitGraph(g,h,'');
begin

line(0,round(getmaxY/2),GetmaxX,round (GetMaxy/2));
line (round (GetMaxX/2),0,round(GetmaxX/2),GetmaxY);

end;

For xm:=20 to 620 do

Begin

x:=(xm-x0)/Mx;

y:=X*X;

ym:=round(y0-y*My);

PutPixel(xm,ym,15);

End;

Readln;

End.

что означает

Begin

x:=(xm-x0)/Mx;

y:=X*X;

ym:=round(y0-y*My); ? Зачем использовать его в коде?

__________

Mx, My-масштабы соответственно по осям x и y, которые показывают число пикселей в одной физической единице,

x, y- физические координаты точки,

xm, ym- машинные координаты точки,

x0, y0- машинные координаты начала физической системы координат.

Прошу помочь, очень срочно!

2. Составить программу для упорядоченное двух элементов по убыванию.

ракета запускается с земли со скоростью V(км час) в направлении движения земли по орбите вокруг солнца. составить программу,определяющую результат запуска ракета в зависимости от скорости V.
Известно,что при V16,4 ракета покинет солнечную систему.