Программку в Паскале. Дан случайный треугольник ABC для которого определен следующий
Программку в Паскале. Дан произвольный треугольник ABC для которого определен последующий набор отличительных параментров: a b c - стороны треугольника; - углы (в градусах) h - высота, опущенная на сторону c; S - площадь; P - периметр треугольника. По трем данным параметрам вычислить все другие. Различные сочетания характеристик определяют варианты заданий. Знаменито стороны a b и вышина h.
Задать свой вопрос1 ответ
Славик Кутловский
Var x,y,n,z,h,C:real;function arccos(x : real) : real;beginarccos := 2 * arctan(sqrt((1 - x) / (1 + x)));end;procedure ygls( a,b,c,t: real);var al,be,ga: real;beginal := arccos((sqr(b) + sqr(c) - sqr(a))/(2 * b * c)) * 180 / pi;writeln('угол A= ',trunc(al));writeln('угол B= ',trunc(180-al-t));end;beginwrite('введите сторону а: ');readln(x);write('введите сторону b: ');readln(y);write('введите угол С: ');readln(C);n:=C;C:=cos(C*180/pi);z:=sqrt(x*x+y*y-2*x*y*C);h:=0.5*sqrt(2*(x*x+y*y)-c*c);ygls(x,y,z,n);writeln('сторона c: ',trunc(z));writeln('высота h: ',trunc(h));writeln('периметр P: ',trunc(x+y+z));writeln('площадь S: ',trunc(z*h));end.
Сема Лентиков
после точки с запятой на новую строку, неловко написал, но, мыслю, разберешься
, оставишь ответ?
Похожие вопросы
-
Вопросы ответы
Новое
NEW
Статьи
Информатика
Статьи
Последние вопросы
Анна хорошо учится у неё много подруг свободное от учёбы время
Обществознание.
10) Килограмм конфет дороже килограмма печенья на 52 р. За 8
Математика.
Во сколько раз число атомов кислорода в земной коре больше числа
Химия.
Составить монолог от имени дневника двоечника 7-10 предложений
Русский язык.
Рассматривая литературный язык как сложное взаимодействие книжного языка и разговорного,В.И.Чернышёв горячо
Разные вопросы.
Арабы входят в __________________ групп народов. Местом расселения арабов с незапамятных
Разные вопросы.
Грузовой автомобиль марки краз за одну поездку может доставить 7.500 кирпичей
Математика.
Определить предложения какие они по цели высказывания и по интонации
Русский язык.
"Три толстяка" Называли эту площадь Площадью Звезды последующей причине.
Русский язык.
на одной грядке коротышки посадили 3 ряда морковок по 8 штук
Разные вопросы.
Облако тегов