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

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

Question

Информатика

Федосей

19 ноября, 19:52

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

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

+4

Ответы (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