Create a program that calculates the area of an arbitrary triangle with sides a b c in the pascal program.

var a, b, c, p, s: real;
begin
writeln (‘Enter the sides of the triangle’);
readln (a, b, c);
p: = (a + b + c) / 2;
s: = sqrt (p * (p-a) * (p-b) * (p-c));
writeln (s);
end.



One of the components of a person's success in our time is receiving modern high-quality education, mastering the knowledge, skills and abilities necessary for life in society. A person today needs to study almost all his life, mastering everything new and new, acquiring the necessary professional qualities.