program EquilateralTriangle;

var
side, perimeter, area: real;

begin
writeln('Enter the length of the side of the equilateral triangle: ');
readln(side);

perimeter := 3 side;
area := (sqrt(3) / 4) side * side;

writeln('Perimeter of the equilateral triangle: ', perimeter:0:2);
writeln('Area of the equilateral triangle: ', area:0:2);
end.