pro-Gramas tu biblioteca de programacion

Este programa obtiene el aria de un triangulo  en el lenguaje pascal.

program area_triangulo;   {nombre del programa}
uses
    crt;
var
   a, b, c:real;         {asignacion de variables}
begin                     {cuerpo del programa}
     clrscr;              {borra la pantalla}
     c:=2;                {dice que c=a}
     gotoxy(20,3);
     write('¨Cual es la base del triangulo? '); {muestra
	              en pantalla lo que esta en comillas}
     readln(a);           {pide un valor}
     gotoxy(20,4);
     write('¨Cual es la altura de triangulo? '); {muestra
	               en pantalla lo que esta en comillas}
     readln(b);           {pide un valor}
     clrscr;
     gotoxy(18,3);
     writeln('El area del triangulo es: ',(a*b)/c:8:3); {muestra 
                         lo que esta en comillas y el valor de b}
     readln;           {se queda pidiendo un valor}
end.                   {termina el programa}