Área de un Triangulo

program logicander;


Uses WinCrt;
Var
    at, a, l : real;
Begin


WriteLn ( 'Ingrese el lado' );
ReadLn (l);
WriteLn ( 'Ingrese la altura' );
ReadLn (a);


at:= (l*a)/2;


WriteLn ( 'El area del triangulo es: ', at:3:3);


end.