Предмет: Информатика,
автор: dddd66
Разработайте программу в pascal вычисления площади треугольника, если известны величины двух сторон треугольника (a, b) и величина угла (γ) в градусах между ними. Площадь треугольника вычисляется по формуле: S=a*h/2, где высота треугольника h вычисляется по формуле: h=b*sin(γ). Программа должна предлагать пользователю ввести величину переменных a, b и γ и на основании этой информации производить расчет S.
Ответы
Автор ответа:
0
// PascalABC.NET 3.1, сборка 1198 от 11.03.2016
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
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
Похожие вопросы
Предмет: Математика,
автор: Аноним
Предмет: История,
автор: mmsft89
Предмет: Қазақ тiлi,
автор: tylegengulzhan
Предмет: Математика,
автор: schenja1982