Программу в Паскале. Дан произвольный треугольник ABC для которого определен следующий набор характерных параментров: a b c - стороны треугольника; α β γ - углы (в градусах) h - высота, опущенная на сторону c; S - площадь; P - периметр треугольника. По трем заданным параметрам вычислить все остальные. Различные сочетания параметров определяют варианты заданий. Известно стороны a b и высота h.

21 Окт 2019 в 21:42
214 +1
0
Ответы
1

program TriangleParameters;

var a, b, h, c, alpha, beta, gamma, S, P: real;

begin
writeln('Enter the sides of the triangle a, b and the height h:');
readln(a, b, h);

c := sqrt(aa + bb); // calculating the third side using Pythagorean theorem
P := a + b + c; // calculating perimeter
S := 0.5 a h; // calculating area
alpha := arccosd((bb + hh - aa) / (2b*h)); // calculating angle alpha in degrees
beta := 90 - alpha; // calculating angle beta
gamma := 90; // the third angle of a right triangle is always 90 degrees

writeln('Side c: ', c);
writeln('Perimeter: ', P);
writeln('Area: ', S);
writeln('Angle alpha: ', alpha);
writeln('Angle beta: ', beta);
writeln('Angle gamma: ', gamma);
end.

19 Апр 2024 в 10:02
Не можешь разобраться в этой теме?
Обратись за помощью к экспертам
Гарантированные бесплатные доработки в течение 1 года
Быстрое выполнение от 2 часов
Проверка работы на плагиат
Поможем написать учебную работу
Прямой эфир