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

Question

Информатика

Желика

2 декабря, 21:10

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

+5

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