Составить программу для вычисления длин высот треугольника, у которого длины сторон abc?

Question

Информатика

Андрея

15 сентября, 12:52

Составить программу для вычисления длин высот треугольника, у которого длины сторон abc?

+4

Ответы (1)

Знаете ответ?

Галуша · Answer 1

Uses crt;

var a, b, c: integer;

h1, h2, h3, p, s:real;

begin

readln (a) ;

readln (b) ;

readln (c) ;

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

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

h1:=2*s/a;

h2:=2*s/b;

h3:=2*s/c;

writeln (h1) ;

writeln (h2) ;

writeln (h3) ;

end.