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

Question

Информатика

Виталя

13 июня, 05:00

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

+3

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