тема: «Линейные алгоритмы». Написать программу для вычисления Y в программе Pascal

Uses crt; var p,a,b,c,xa,xb,xc,ya,yb,yc,ab,ac,bc,xab,yab,xbc,ybc,xac,yac: real; s: real; begin writeln('введите х координаты вершин а и b'); readln(xa,xb); writeln('введите y координаты вершин а и b'); readln(ya,yb); xab: =xb-xa; yab: =yb-ya; ab: =sqrt(xab*xab+yab*yab); writeln('введите х координаты вершин а и с'); readln(xa,xc); writeln('введите y координаты вершин а и c'); readln(ya,yc); xac: =xc-xa; yac: =yc-ya; ac: =sqrt(xac*xac+yac*yac); writeln('введите х координаты вершин b и с'); readln(xb,xc); writeln('введите y координаты вершин b и c'); readln(yb,yc); xbc: =xc-xb; yab: =yc-yb; bc: =sqrt(xbc*xbc+ybc*ybc); p: =(ab+bc+ac)/ 2; s: =sqrt(p*(p-ab)*(p-bc)*(p-ac)); writeln(s); end.

Увас перепутаны скорости, судя по условию скорость ахилиеса гораздо меньше скорости черепахи ну  решение  тривиально,  т.к.  черепаха  движется  равномерно  можно  взять  ее  за  точку  отсчета  и  считать  относительно  нее скорость  сближения vs  =  v1-v2 растояние  которое  надо  пройти xs  =  x2-x1 время необходимое  на  это  t  = xs/vs надеюсь  написать  настолько  простую  программу  вы  сможете  сами