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

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