Даны координаты вершин треугольника и координаты точки внутри него. Найти расстояние от заданной точки до ближайшей стороны треугольника. В качестве подпрограммы оформить вычисление расстояния от точки до стороны треугольника.

Марш геометрию читать!

P.S. Решения буду отсюда удалять.

На форуме в основном преподаватели
решаем лучше задачку про ключ, этот вариант ещё прост, если её кто-то решит, я размещу следующую - более сложную и там целый ряд Найти экономную заготовку для ключа.

я знаю решение, мне надо слова составить на форте по решению

помогите пожал-та

ауу ребята , кто на форте решает задачки?

Да-да, бегом читать геометрию.

Вот чего вы напали на бедного студента!
Он ведь см. цитату!
2 SErGAfaN_11 ты напиши сюда свой алгоритм и может кто-нить закодит!

жалко студента:
[code]\ Пусть вершины треугольника 1 2 3, а точка внутри 4:
( решение на спф4 )

[вырезано Хищником] "Бедный студент" не знает разницу между "Эвклидом" (Евклидом) и Пифагором. Дел на 15 минут - но начать надо с учебника по геометрии. И нечего оказывать медвежьи услуги!

Хищник прав - готовое решение ему никак не поможет.

Кажется...м... растояние... это перпендикуляр проведенный из... точки к... стороне.

У меня сложилось мнение, что у студента сам алгоритм решения затруднений не вызывает, а нет у него умения писать на Форте - отсутствие практических навыков работы в какой-либо Форт-системе.

Алгоритм:
1. Угловой коэф-т: K12=y2-y1/x2-x1; k13=y3-y1/x3-x1; k23=y3-y2/x3-x2;
2. Ищем координаты опущенных перпендикуляров xn, yn.
Xn1=x4+(y4-y1)*k12/k12*k12+1, yn1=k12(xn1-x1)+y1;
Xn2=x4+(y4-y2)*k23/k23*k23+1, yn2=k23(xn2-x2)+y2;
Xn3=x4+(y4-y1)*k13/k13*k13+1, yn3=k13(xn3-x1)+y1;
3. По пифагору определяем расстояние:
R14=(xn1-x4)*(xn1-x4)+(yn1-y4)*(yn1-y4) и все под корнем
R24=(xn2-x4)*(xn2-x4)+(yn2-y4)*(yn2-y4) и все под корнем
R34=(xn3-x4)*(xn3-x4)+(yn3-y4)*(yn3-y4) и все под корнем

ну, вот, дальше надо префиксную запись развернуть в постфиксную.
То есть: yn1=k12(xn1-x1)+y1;
будет выглядеть так: xn1 x1 - k12 * y1 +
дальше, надо не забыть, что параметры приходят на стеке данных и лежат там в определенном порядке, например следующем:
y1 k12 xn1 x1 <-- вершина стека данных справа
тогда последовательность операций будет следующей: - * +
то есть, определение вычисляющее коэффициенты yn1, yn2, yn3 будет следующим:
: yn ( y k xn x --> result ) - * + ;
только коэффициенты должны лежать в правильном порядке