Var
a,b,alpha,s:real;
begin
writeln(Вычисление площади треугольника);
writeln(Введите (через пробел) длины двух сторон (см) треугольника);
readln(a,b);
writeln(Введите величину угла (градус) между сторонами треугольника);
readln(alpha);
alpha:=DegToRad(alpha);
writeln(Площадь треугольника: ,0.5*a*b*sin(alpha), кв.см.)
end.
Тестовое решение:
Вычисление площади треугольника
Введите (через пробел) длины двух сторон (см) треугольника
25 17
Введите величину угла (градус) между сторонами треугольника
30
Площадь треугольника: 106.25 кв.см.
Вычисление площади треугольника
Введите (через пробел) длины двух сторон (см) треугольника
11 16.3
Введите величину угла (градус) между сторонами треугольника
39
Площадь треугольника: 56.4185730576179 кв.см.
Если ответ по предмету Информатика отсутствует или он оказался неправильным, то попробуй воспользоваться поиском других ответов во всей базе сайта.