program Test1;
uses Math;
var
a, b, c, anglea, angleb, anglec: Real;
begin
Write ('Сторона а: ');
ReadLn(a);
Write ('Сторона b: ');
ReadLn(b);
Write ('Сторона c: ');
ReadLn(c);
anglea := Arccos ((b * b + c * c - a * a) / (2 * b * c)) * 180 / Pi;
angleb := Arccos ((a * a + c * c - b * b) / (2 * a * c)) * 180 / Pi;
anglec := 180 - (anglea + angleb);
WriteLn ('Угол а = ', anglea :5 :1);
WriteLn ('Угол b = ', angleb :5 :1);
WriteLn ('Угол c = ', anglec :5 :1);
ReadLn;
end.
Объяснение:
Расчетные формулы из теоремы косинусов.
* 180 / Pi - в конце формул для перевода радиан в градусы, где Pi = 3,14 константа должна объявляться в Math, если нет напишите сами.
Третий угол рассчитывается исходя из соображения, что сумма углов треугольника равна 180 градусов.
Объяснение:
Исполнители бывают двух типов: формальные (выполняют действия не понимая смысла работы) и неформальные (понимают то, что делают и могут изменить действия в алгоритме)
а) симфонический оркестр - неформальный исполнитель - могут вносить свои чуства в исполнение, понимают то, что делают музыканты.
б) ученик сам решает - неформальный испонитель
в) ученик списывает - формальный исполнитель
г) фармацевт - формальный (точное исполнение рецепта иначе может быть другой результат от лечения)
д) врач - неформальный исполнитель, тк зная возможные причины рассматривает разыне варианты, учитывая особенности данного человека
е) автомат - формальный исполнитель, вообще не понимает своих действий, выполняет заданную программу
ж) компьютер - формальный исполнитель - выполняет программу, созданную программистами.