Question

Дано действительное число P- периметр равностороннего треугольника. Составить программу,которая определяет площадь этого треугольника.

Answer 1

var p:real;

begin

  read(p);

  writeln(0.5*p*p/9*sin(60));

end.