Question

Pascal, написать программу, находящую площадь и периметр треугольника.​

Answer 1

Ответ:

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

begin

readln(a,b,c);

p:=a+b+c;

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

write('Периметр равен: ',p,' Площадь равна: ',s);

end.

Объяснение: