The side of an equilateral triangle is given. Find the area of this triangle, its height
The side of an equilateral triangle is given. Find the area of this triangle, its height, the radius of the circumcircle and the inscribed circle. In Pascal’s language.
rogram 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.