Помогите пж. Составить линейную программу для решения задачи.Дана сторона равностороннего треугольника.Найти высоту этого треугольника
Var a,h:real;
begin
write(Введите длину стороны треугольника a: );
readln(a);
h:=(sqrt(3)/2)*a;
writeln(Высота h: ,h);
end.
Оцени ответ
