Сделать в паскале! запросить с клавиатуры координаты точки (x, y) и горизонтального отрезка прямой (xn, xk, yn) и определить, лежит точка на отрезке прямой или нет. сообщение об этом вывести на экран. подсказка. если координата y точки не равна координате y прямой, то не лежит, если координата х точки не находится в пределах между хn начала и хk конца прямой, то точка не лежит на прямой.
Katya08777
2
09.06.2019 03:30
0
Другие вопросы по теме Информатика
Елена29121983
22.05.2020 17:02
kirilos2014
29.04.2019 22:32
увливуют
29.04.2019 22:45
temaimcheg
29.04.2019 22:47
irinaa10
29.04.2019 21:26
Altama
29.04.2019 21:28
Непатриот
29.04.2019 21:29
bubliknazar2003
29.04.2019 21:40
Finneas
29.04.2019 21:47
Популярные вопросы
- Если нужна дополнительные данные- пишите _ a(-8;6;-2) _ b(-4;-8;4)...
3 - Надо закончить уравнение реакции Na+CI Mg+O2...
2 - 4 Complete the sentences with the words in the box. addition lastly...
3 - ОЧЕНЬ ЧТО ЗНАЕТЕВАРIAНТN9 1. Комната имеет размеры 5х4х3 м. Сколько...
2 - Тақырыбы: Синтаксис. Жай сөйлем, оның айтылу мақсатына қарай түрлері,...
2 - Мәтіннің соңғы азатжолында берілген күрделі атаулардың жазылу емлесін...
1 - Религия в Древнем Египте сообщение...
1 - Які почуття у вас сколихнула у вас пісня стоїть явір над водою...
3 - Сколько тепла нужно, чтобы расплавить 0,5 кг серебра при 20 ° C?...
1 - 3. Запишите следующие величины, применяя кратные и дольные приставки:...
1
a,b,z,x,y:real;
begin
write('Введите координаты точки (x,y): ');
readln(x,y);
write('Введите координаты отрезка (Xn, Xk, Yn): ');
readln(a,b,z);
if (y=z) and (x>=a) and (x<=b) then
writeln('Да, принадлежит')
else writeln('Нет, не принадлежит')
end.