Главная arrow icon Вопросы arrow icon Учеба и наука arrow icon Информатика arrow icon решить задачу в Pascal.Заданы координаты вершин…

решить задачу в Pascal.Заданы координаты вершин треугольника и точки.Определить лежит ли точка внутри треугольника.. - вопрос №1364073

Елена Минегалеева
07.02.15
Учеба и наука / Информатика
1 ответ

Лучший ответ по мнению автора

Александр Константинович
uses crt;
var x1,y1,x2,y2,x3,y3,tx,ty:real;
begin
clrscr;
writeln('Введите координаты вершин треугольника по часовой стрелке:');
readln(x1,y1,x2,y2,x3,y3);
writeln('Введите координаты точки:');
readln(tx,ty);
if((tx-x1)*(y1-y2)-(ty-y1)*(x1-x2)>=0)and
  ((tx-x2)*(y2-y3)-(ty-y2)*(x2-x3)>=0)and
 ((tx-x3)*(y3-y1)-(ty-y3)*(x3-x1)>=0) then
    write('Лежит') else write('Не лежит');
readln
end.
07.02.15
Лучший ответ по мнению автора

Еva
от 100 p.
Рейтинг: 122 043
6-й в Учебе и науке
Читать ответы
Посмотреть всех экспертов из раздела Учеба и наука > Информатика
Пользуйтесь нашим приложением Доступно на Google Play Загрузите в App Store
  • карты visa
  • карты master card
  • карты maestro
  • карты МИР
Мы используем файлы cookie. Пользуясь сайтом, вы принимаете условия нашего соглашения. Принять Детальнее