
Авсей
6 год назад
Треугольник задан величинами своих углов и радиусом описанной окружности. Найти стороны треугольника . брать удобные значения и плиз как можно проще решить
ОТВЕТЫ

Bobynin
Jul 9, 2019
Для радиуса описанной окружности имеется соотношение

// PascalABC.NET 3.2, сборка 1367 от 20.12.2016
// Внимание! Если программа не работает, обновите версию!
var
a,b,c,R,dA,dB,dC:real;
begin
Writeln(Введите углы A,B в градусах и радиус R);
Read(dA,dB,R);
dC:=180-dA-dB;
a:=2*R*sin(dA*Pi/180);
b:=2*R*sin(dB*Pi/180);
c:=2*R*sin(dC*Pi/180);
Writeln(Угол C: ,dC:0:2);
Writeln(a=,a:0:5);
Writeln(b=,b:0:5);
Writeln(c=,c:0:5)
end.
Пример
Введите углы A,B в градусах и радиус R
30 70 50.0
Угол C: 80.00
a=50.00000
b=93.96926
c=98.48078
// PascalABC.NET 3.2, сборка 1367 от 20.12.2016
// Внимание! Если программа не работает, обновите версию!
var
a,b,c,R,dA,dB,dC:real;
begin
Writeln(Введите углы A,B в градусах и радиус R);
Read(dA,dB,R);
dC:=180-dA-dB;
a:=2*R*sin(dA*Pi/180);
b:=2*R*sin(dB*Pi/180);
c:=2*R*sin(dC*Pi/180);
Writeln(Угол C: ,dC:0:2);
Writeln(a=,a:0:5);
Writeln(b=,b:0:5);
Writeln(c=,c:0:5)
end.
Пример
Введите углы A,B в градусах и радиус R
30 70 50.0
Угол C: 80.00
a=50.00000
b=93.96926
c=98.48078
54
Смежные вопросы: