Составить программу, которая находит боковую сторону (b) в равнобедренном треугольнике, если известна площадь (s) и основание (a)

Question

Информатика

Евстафий

23 августа, 22:50

Составить программу, которая находит боковую сторону (b) в равнобедренном треугольнике, если известна площадь (s) и основание (a)

+1

Ответы (1)

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

Митрюха · Answer 1

uses crt;

uses crt;

var h, a, b, c : real;

begin writeln ('Введите значение высоты h') ;

readln (h) ; c:=2*h;

a:=sqrt (2*h*h) ;

b:=a;

writeln ('Стороны треугольника равны a = ', a:3:3,' b = ', b:3:3,' c = ', c:3:3) ;

end.