Курсовая работа: Создание программы для определения вершин пирамиды с выпуклым основанием по данным точкам
1) Function MixeMult(a,b,c:Coordinates):real
2Назначение: возвращает MixeMult:= значение смешанного произведения векторов а и b
3Входные параметры: a,b;
4Выходные параметры: -.
5Возврат : MixeMult
10.Спецификация процедуры coplanarity;
1) Function coplanarity(a,b,c:Coordinates):boolean
2Назначение: возвращает coplanarity :=истина ,если векторы а,b и c компланарны,иначе- coplanarity :=ложь .
3Входные параметры: a,b,c;
4Выходные параметры: -.
Спецификация подпрограмм для определения вершин пирамиды
1.Спецификацияпроцедурыploskost
1) Procedure ploskost(a,b,c:coordinates;var ax,bx,cx,dx:real);;
2) Назначение: Строит по 3-м точкам уравнение плоскости вида Ax+By+Cz+D=0 и заносит в ax,bx,cx,dx соответствующие коэффициенты
3) Входные параметры:a,b,c,ax,bx,cx,dx;
4) Выходные параметры: ax,bx,cx,dx.
2.Спецификация функции proverka_na_ploskost;
1) function proverka_na_ploskost(var P:P_descriptor;var mno:mnoj; n:byte):boolean;;
2) Назначение: проверяет условие принадлежности nточек(указатели которых хранятся в множестве mno) к плоскости ,построенной с помощью процедуры ploskost,возращает значение истины в случае удачной проверки, иначе-ложь;
3) Входные параметры: P,mno,n;
4) Выходные параметры: P,mno.
5) Возврат : f
3.СпецификацияфункцииVypuklost;
1) Function Vypuklost(var P:P_descriptor;mno:mnoj;n:byte):boolean;;
2) Назначение: Проверяет многоугольник на выпуклость, путем перебора nточек из множества mno,формированием их в векторы и последующим векторным перемножением . Возвращает значение истины, если при все N точках знак векторного умножения сохраняется, иначе -ложь;
3) Входные параметры: P,mno,n;
4) Выходные параметры: P.
5) Возврат : Q
4.СпецификацияфункцииFinDaPyramid;