Julina23
Опубликовано 6 лет назад по предмету Информатика от Julina23


 Решить задачу на языке Паскаль. Определить , лежит ли точка с известными координатами на вертикальном отрезке прямой с заданными координатами концов. Результаты вывести на экран.

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

    Program pryam;

    Var y1, y2, y3, x1, x2 : real;

    Begin

      writeln ('Введите координату (у) верхней точки прямой');

      readln (y1);

      writeln ('Введите координату (у) нижней точки прямой');

      readln (y2);

      writeln ('Введите координату (х) точек-концов прямой');

      readln (x1);

      writeln ('Введите координату (у) точки, принадлежность к прямой которой нужно определить');

      readln (y3);

      writeln ('Введите координату (х) точки, принадлежность к прямой которой нужно определить');

      readln (x2);

    if (y3<=y1) and (y3>=y2) and (x2=x1) then writeln (' принадлежит ')

    else writeln (' не принадлежит ');

    readln;

    End.

Не тот ответ, который вам нужен?
Найди нужный
Задай вопрос

Лучшие за месяц