Вычислить площадь треугольника по двум сторонам и углу между ними осуществив перевод углов из градуса в радианы

Question

Информатика

Арсеньич

20 июля, 11:02

Вычислить площадь треугольника по двум сторонам и углу между ними осуществив перевод углов из градуса в радианы

+3

Ответы (1)

Знаете ответ?

Макс · Answer 1

Var

a, b, alpha: real;

begin

writeln ('Введите длины сторон и величину угла') ;

readln (a, b, alpha) ;

alpha : = 0.5 * a * b * sin (alpha * pi / 180) ;

writeln ('Площадь треугольника равна ' + alpha) ;

end.