The side of an equilateral triangle is given. Find the area of this triangle, its heights, radii, inscribed

The side of an equilateral triangle is given. Find the area of this triangle, its heights, radii, inscribed and circumscribed circles. PASCAL.

program zz1;
var a, d, S, r1, r2: real; // set variables of non-integer type
begin
write (‘enter the side of an equilateral triangle’);
read (a);
d: = (sqrt (3) * a) / 2 ;; // find the height of the triangle
r1: = a / (sqrt (3) * 2);
r2: = a / (sqrt (3));
s: = (sqrt (3) * a * a) / 4; // find the area of ​​an equilateral triangle
writeln (‘the area of ​​an equilateral triangle =’, s: 5: 2); // display the answer in the format of five characters for the whole number and two characters after the dot
writeln (‘the height of an equilateral triangle =’, d: 5: 2);
writeln (‘the radius of the inscribed circle of an equilateral triangle =’, r1: 5: 2);
write (‘the radius of the circumscribed circle of an equilateral triangle =’, r2: 5: 2);
end.