Известны длины сторон треугольника a, b, c. Написать - вопрос №11189566 от kwasmarianna 10.05.2020 19:12

Question

Информатика: Известны длины сторон треугольника a, b, c. Написать программу, вычисляющую площадь этого треугольника (по формуле Герона). Выполнить программу для исходных данных a=3, b=4, c=5. Язык Паскаль я не понимаю как это делается

kwasmarianna · Answer

program GWR;

var

p1,a,b,c,s:real;

begin

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

readln(a,b,c);

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

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

write(s);

end.