Предположим что отрезок будет равен X см тогда зная координату точки можно узнать будет ли точка принадлежать отрезку надо просто длинна отрезка минус значение координаты
program zadacha;
var x1,y1,x2,y2,x3,y3,a,b: real;
begin
writeln('Введите координаты x1,y1');
readln(x1,y1);
writeln('Введите координаты x2,y2');
readln(x2,y2);
writeln('Введите координаты x3,y3');
readln(x3,y3);
a:=(y1-y2)/(x1-x2);
b:=((y1+y2)-a*(x1+x2))/2;
if (y3 = a*x3+b) and (x3 > x1) and (x3 < x2) or (y3 = a*x3+b) and (x2 > x1) and (x3 < x1)
then writeln('Точка принадлежит отрезку')else writeln('Точка не принадлежит отрезку')
end.
1)1110001
2)10100111
3)101101100
4)1000001110
Простой пример линейного алгоритма таков :
1.Выкопать в земле ямку
2.Опустить в ямку саженец
3.Засыпать ямку с саженцем землей
4.Полить саженец водой
Простой пример циклического алгоритма таков :
1.Смотрю телевизор
2.Уже ночь ?
3(а)Да , то 4.Ложусь спать 3(б)Нет , то 1.Смотрю телевизор
<span>и вновь проверка условия до тех пор пока не настанет ночь
Просто пример </span><span>разветвляющего алгоритма таков :
</span>
1.Я встречу друга ?
2(а).Да ,то 3. Расскажу историю
2(б) Нет ,то *конец алгоритма*
<u>Примеры данных алгоритмов в виде блок-схем ниже</u>
Леонард Эйлер<span> — математик, механик, </span>физик<span> и </span>астроном<span>. Решение задач с помощью кругов Эйлера...</span>
Можно разместить посты в соц.сетях таких как:
Так же на различных форумах на разные темы!!!