Есть ответ 👍

напишите в кумире имя юля

102
134
Посмотреть ответы 1

Ответы на вопрос:


Var a,b,c,cosa, cosb, cosc: real;   begin  writeln('введите стороны треугольника авс');   read(a,b,c);   cosa: =(sqr(b)+sqr(c)-sqr(a))/(2*b*c);   cosb: =(sqr(c)+sqr(a)-sqr(b))/(2*c*a);   cosc: =(sqr(a)+sqr(b)-sqr(c))/(2*a*b);   writeln('косинус угла а = ', cosa, ' косинус угла в =', cosb,' косинус угла c =', cosc);   end.

Популярно: Информатика