
Мартемьян
5 год назад
составить программу для нахождения высоты равностороннего треугольника, если сторона равна аПаскальЗаранее спасибо
ОТВЕТЫ

Svetlin
Oct 24, 2020
На держи
program Something;
var a, h: real;
begin
writeln('Введите сторону ' );
readln(a);
h:=sqrt(a*a - 0.25*a*a);
writeln('Высота равна ' ,h:2:3);
end.
program Something;
var a, h: real;
begin
writeln('Введите сторону ' );
readln(a);
h:=sqrt(a*a - 0.25*a*a);
writeln('Высота равна ' ,h:2:3);
end.
557