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

Question

Информатика

Дебора

23 августа, 13:05

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

+5

Ответы (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.