Выяснить лежат ли точки на одной прямой

[commander_spock]

Даны координаты трех точек на плоскости. Выяснить лежат ли эти точки на одной прямой. Вычисление расстояния между двумя точками оформить в виде процедуры пользователя.

Заранее спасибо.

[p51x]

В чем проблема? По двум точкам составляете уравнение для прямой, и проверяете удовлетворяет ли ему третья.

[Stilet]

Формула принадлежности точек одной прямой какая?

[commander_spock]

Сообщение от p51x

В чем проблема? По двум точкам составляете уравнение для прямой, и проверяете удовлетворяет ли ему третья.

в том-то и проблема. Как расстояние между точками просчитать, я знаю, но вот на предмет уравнения... не математик я, только учусь)

[Stilet]

а с поиска начать не хочешь?
http://www.programmersforum.ru/showthread.php?t=91883

[Пепел Феникса]

не математик я, только учусь)

я это в школе проходил, причем тут математик?

[commander_spock]

Хорошо, вопрос. вот у меня есть кусок кода, который создает массив точек:

n:=10;
writeln('Координаты Х точек:');
for i:=1 to n do
 begin
  x[i]:=i;
  write(x[i]:4);
 end;
writeln;
writeln;
writeln('Координаты Y точек:');
for j:=1 to n do
 begin
  y[j]:=j-3;
  write(y[j]:4);
 end;

как мне устроить обработку, чтобы проверить принадлежность точек одной прямой? Формулу я уже видел.

[Utkin]

Укажи две точки прямой, ты дал точки, но не дал прямую. Требуется как минимум две точки, принадлежащие прямой.
И чисто вопрос удобства - вводить пары координат приятней и удобней, чем сначала все Х, а потом все У.... Вероятность ошибиться в разы меньше.

[commander_spock]

Это я понимаю. Просто уже не могу сообразить, как это в виде кода сделать....

[Utkin]

По двум точкам находишь коэффициенты k и b для уравнения у=kx+b
Затем уже в цикле проверяешь соответствует ли конкретный у формуле kx+b с конкретным у. И усе.