Дана сторона равностороннего треугольника. найти площадь этого треугольника. исходные данные и результат вывести в табличной форме. работа выполняется в си

Var
  a: real;

begin
  readln(a);
  writeln(String.Format('P = {0}                                             S = {1}', a * 3, sqrt(3) / 4 *               sqr(a)));
end.