Вычислить площадь и периметр треугольника НОМЕР 3!!!! Помогите пожалуйста
Приложения:

huston81:
какой язык?
Ответы
Ответ дал:
0
Ответ:
Задание 3:
var
a, b, c, p, s: real;
begin
Write('Введите стороны треугольника через пробел: ');
ReadLn(a, b, c);
p := (a + b + c) / 2;
s := sqrt(p * (p - a) * (p - b) * (p - c));
WriteLn('Площадь треугольника S = ', s:0:2);
end.
Объяснение:
a, b, c, p, s: real;
begin
Write('a b c : ');
ReadLn(a, b, c);
p := (a + b + c) / 2;
s := sqrt(p * (p - a) * (p - b) * (p - c));
WriteLn('Площадь треугольника S = ', s:0:2);
end.
Вас заинтересует
1 год назад
2 года назад
2 года назад
7 лет назад
7 лет назад