Составить программу вычисляющую площадь произвольного треугольника со сторонами a b c в программе pascal

Question

Варвара Белоусова

Информатика

23 января, 05:49

Составить программу вычисляющую площадь произвольного треугольника со сторонами a b c в программе pascal

+5

Ответы (1)

Знаешь ответ на этот вопрос?

Тимур Попов · Answer 1

var a, b, c, p, s:real;

begin

writeln ('Введите стороны треугольника');

readln (a, b, c);

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

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

writeln (s);

end.