profile
Опубликовано 5 лет назад по предмету Информатика от Valeria7

Заданы координаты трех точек плоскости. Эти точки не лежат на одной прямой?

Нужна программа в Паскале.

  1. Ответ
    Ответ дан Kitsu

    var x1,x2,x3,y1,y2,y3:real;
    begin
    readln(x1,y1);
    readln(x2,y2);
    readln(x3,y3);
    if (x3-x1)*(y2-y1)=(x2-x1)*(y3-y1) then writeln('lejat na pryamoi') else writeln('ne lejat na pryamoi');
    end.

Самые новые вопросы