Составить программу, которая находит боковую сторону(b) - вопрос №2865814 от krichilskaatтанюшка 21.02.2021 23:51

Question

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

krichilskaatтанюшка · Answer

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.