Помогите с Пасклем!

На вход программе подаются три целых числа a, b, c - длины сторон треугольника. Вывести значение площади данного треугольника. Гарантируется, что с введёнными длинами сторон треугольник существует. Можно использовать любой способ нахождения площади треугольника.

Question

Информатика

Нюрася

2 апреля, 07:20

Помогите с Пасклем!

На вход программе подаются три целых числа a, b, c - длины сторон треугольника. Вывести значение площади данного треугольника. Гарантируется, что с введёнными длинами сторон треугольник существует. Можно использовать любой способ нахождения площади треугольника.

+2

Ответы (1)

Знаешь ответ?

Юнонка · Answer 1

Var a, b, c:integer; p, s:real;

begin

readln (a, b, c);

p: = (a+b+c) / 2;

s:=sqrt (p * (p-a) * (p-b) * (p-c));

writeln ('s = ', s:5:2);

end.

Пример:

3 4 5

s = 6.00