Question

помогите пж. Составить линейную программу для решения задачи.Дана сторона равностороннего треугольника.Найти высоту этого треугольника

Answer 1

var a,h:real;
begin
write('Введите длину стороны треугольника a: ');
readln(a);
h:=(sqrt(3)/2)*a;
writeln('Высота h: ',h);
end.