Напишите программу нахождение площади треугольника по формуле Герона, на Паскале

Question

Информатика

Маня

2 мая, 05:50

Напишите программу нахождение площади треугольника по формуле Герона, на Паскале

+1

Ответы (1)

Знаете ответ на вопрос?

Филофей · Answer 1

Program Pr1;

uses crt;

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

begin

clrscr;

readln (a, b, c) ;

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

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

s:=s*p;

s:=sqrt (s) ;

writeln (s) ;

end.