Разработайте программу в pascal вычисления площади треугольника, если известны величины двух сторон треугольника (a, b) и величина угла (γ) в градусах между ними. площадь треугольника вычисляется по формуле: s=a*h/2, где высота треугольника h вычисляется по формуле: h=b*sin(γ). программа должна предлагать пользователю ввести величину переменных a, b и γ и на основании этой информации производить расчет s.
begin
var a,b,g:integer;
Write('Введите длины сторон a и b: '); Read(a,b);
Write('Введите угол между сторонами, град: '); Read(g);
var h:=b*sin(DegToRad(g));
Writeln('Площадь треугольника равна ',a*h/2)
end.
Тестовое решение:
Введите длины сторон a и b: 10 20
Введите угол между сторонами, град: 38
Площадь треугольника равна 61.5661475325658