Опубликовано 12.06.2017 по предмету Информатика от Гость >> <<

Дан треугольник со стороной a и прилежащими углами Y и B. Вычислить площадь треугольника, найти остальные стороны и угол между ними.
Написать в паскале

Ответ оставил Гость

Var a,b,c,A1,B1,C1,S:real;
begin
write(введите угол c => );
readln(c);
write(введите угол b => );
readln(b);
write(введите сторону A1 => );
readln(A1);a:=180-(b+c);
writeln(угол а =,a);
B1:=(sin(b)*A1)/sin(a);
writeln(сторона В=,B1);
C1:=sin(c)*A1/sin(a);
writeln(сторона C=,C1);
S:=0.5*B1*C1*sin(a);
writeln(площадь s=,s);
end.