Lisakzhas 31 октября 2019 в 07:11
Помогите ПОЖАЛУЙСТА нужно составить программу которая находит площадь и периметр поямоугольника
2)составте программу для вычисления косинусов углов треугольника со старонами а,в,с
Помогите ПОЖАЛУЙСТА нужно составить программу которая находит площадь и периметр поямоугольника
2)составте программу для вычисления косинусов углов треугольника со старонами а,в,с
Var
a, b: real;
begin
readln(a, b);
writeln(P = , 2 * (a + b));
writeln(S = , a * b);
end.
2)
var
a, b, c: real;
begin
readln(a, b, c);
writeln(cos(alpha) = , (b * b + c * c - a * a) / (2 * b * c));
writeln(cos(beta) = , (a * a + c * c - b * b) / (2 * a * c));
writeln(cos(gamma) = , (a * a + b * b - c * c) / (2 * a * b));
end.
a, b: real;
begin
readln(a, b);
writeln(P = , 2 * (a + b));
writeln(S = , a * b);
end.
2)
var
a, b, c: real;
begin
readln(a, b, c);
writeln(cos(alpha) = , (b * b + c * c - a * a) / (2 * b * c));
writeln(cos(beta) = , (a * a + c * c - b * b) / (2 * a * c));
writeln(cos(gamma) = , (a * a + b * b - c * c) / (2 * a * b));
end.
Компьютеры и вычисления
90
96
Для комментирования необходимо зарегистрироваться на сайте