ta; gamma; perimetr; square; bis; ravn; proverka;
} Ttreug; Ttreug TMaskadr [50]; MAS;
int i; Treug / / Створення класу Трикутник
{public: / / Визначення видимих ??методів і змінних
float Xa, Xb, Xc, Ya, Yb, Yc; AB, BC, CA, alpha, betta, gamma; p, polup, S, t;
/ / Конструктор класу з параметрами (float Xa1, float Xb1, float Xc1, float Ya1, float Yb1, float Yc1);
/ / Конструктор створення об'єкта типу Трикутник без початкових параметрів ();
~ Treug (); proverka (); ();// Метод класу для розрахунку довжин сторін трикутника
float putAB (); float putBC (); float putCA ();
ugol ();// Метод класу для розрахунку кутів трикутника
float putAlpha (); float putBetta (); float putGamma ();
float perimetr ();// Метод класу для розрахунку периметра треугольнікаsquare ();// Метод класу для розрахунку площі трикутника
/ / Метод класу для перевірки: чи є трикутник равностороннімprint (TImage & img);// Метод класу для отрисовки трикутника
};
/ / Опис конструктора :: Treug (float Xa1, float Xb1, float Xc1, float Ya1, float Yb1, float Yc1)
{= Xa1; Xb=Xb1; Xc=Xc1;
Ya=Ya1; Yb=Yb1; Yc=Yc1;
}; :: Treug () {} / / Перевантаження конструктор без параметрів :: ~ Treug () {= 0; Xb=0; Xc=0;
Ya=0; Yb=0; Yc=0; } :: Storona ()
{= sqrt (pow (Xa-Xb,
) + pow (Ya-Yb,
));=sqrt (pow (Xb-Xc,
) + pow (Yb-Yc,
));=sqrt (pow (Xc-Xa,
) + pow (Yc-Ya,
));
}; Treug :: putAB () {return AB; } Treug :: putBC () {return BC; } Treug :: putCA () {return CA; } Treug :: proverka ()
{((AB == BC + CA) | | (BC == AB + CA) | | (CA == AB + BC)) {return 0; } Return 1;
}; :: ugol ()
{t=180/M_PI;=(acos ((pow (BC, 2) + pow (CA, 2) - pow (AB, 2)) / (2 * BC * CA)) ) * t;=(acos ((pow (AB, 2) + pow (CA, 2) - pow (BC, 2)) / (2 * AB * CA))) * t;=(acos ((pow ( AB, 2) + pow (BC, 2) - pow (CA, 2)) / (2 * AB * BC))) * t;
}; Treug :: putAlpha () {return alpha; } Treug :: putBetta () {return betta; } Treug :: putGamma () {return gamma; } Treug :: square ()
{polup=(AB + BC + CA) / 2;=sqrt (polup * (polup-AB) * (polup-BC) * (polup-CA)); S;
} Treug :: perimetr ()
{p=AB + BC + CA; p;
}; Treug :: print (TImage & img)
{max=Xa; (Ya> Xa) {max=Ya; } ((Xb> Xa) && (Xb> Ya)) {max=Xb; } ((Yb> Xa) && (Yb> Ya) && (Yb> Xb)) {max=Yb; } ((Xc> Xa) && (Xc> Ya) && (Xc> Xb) && (Xc> Yb)) {max=Xc; } ((Yc> Xa) && (Yc> Ya) && (Yc> Xb) && (Yc> Yb) && (Yc> Xc)) {max=Yc; } Mashtab=300/max;. Canvas-> MoveTo (Xa * mashtab, Ya * mashtab);. Canvas-> LineTo (Xb * mashtab, Yb * mashtab);. Canvas-> LineTo (Xc * mashtab, Yc * mashtab);. Canvas-> LineT...
