Помогите решить задачу по теме использования функции

[Many man]

Разработать функцию f(х, у, z), которая по длинам сто¬рон треугольника х, у, г вычисляет его площадь. С по¬мощью данной функции по заданным вещественным числам а, Ь, с, d, е, f, g найти площадь пятиугольника, изображенного на рисунке.

[alex_fcsm]

uses crt;
var a,b,c,d,e,f,g,M:real;

function Sl(x,y,z:real):real;
var p:real;
begin
p:=(x+y+z)/2;
sl:=sqrt(p*(p-x)*(p-y)*(p-z));
end;

begin
a:=1;b:=1;c:=1;d:=1;e:=1;f:=1;g:=1;
M:=Sl(a,b,g)+Sl(f,g,c)+Sl(e,g,d);
writeln;
writeln(M);
end.

[Many man]

Спасибо,но мне надо было на C++. Но я сам попробую перевести.
Ещё раз огромное спасибо

[Many man]

Программа выдаёт ошибки, напишите как это будет выглядеть в СИ

[Mixasik]

#include <stdio.h>;
#include <conio.h>;
#include <math.h>;

float sl (float x, float y, float z)
{
 float p;
 p = (x+y+z)/2;
 Return sqrt(p*(p-x)*(p-y)*(p-z));
}

main()
{
 float a=1,b=1,c=1,d=1,e=1,f=1,g=1,m=1;
 m = sl(a,b,c) + sl(f,g,c) + sl(e,g,d);
 printf("\nf=%7.3f",m);
 getch();/*аналог readkey*/
}