Определите длину третьей стороны треугольника по координатам двух сторон и углу между ними - PascalABC.NET

Узнай цену своей работы

Формулировка задачи:

Задание: Определите длину третьей стороны треугольника по координатам двух сторон и углу между ними (угол задается в радианах) ___ По каким формулам это нужно находить?

Решение задачи: «Определите длину третьей стороны треугольника по координатам двух сторон и углу между ними»

textual
Листинг программы
var a,b,c,uc:real;
begin
repeat
writeln('Введите 2 стороны треугольника');
readln(a,b);
until(a>0)and(b>0);
repeat
write('Введите угол между ними в градусах 0<uc<180 uc=');
readln(uc);
until(uc>0)and(uc<180);
uc:=uc*pi/180;//переведем в радианы
c:=sqrt(a*a+b*b-2*a*b*cos(uc));
writeln('Сторона С=',c:0:2);
end.

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

Оцени полезность:

7   голосов , оценка 4 из 5
Похожие ответы