Turbo Pascal es un completo sistema de desarrollo de software que incluye un compilador y un entorno de desarrollo integrado (IDE) para el lenguaje de programación Pascal, desarrollado por Borland y liderado por Philippe Kahn.
Fue lanzado en 1983 para MS-DOS, CP/M, CP/M-86 y, posteriormente, para Microsoft Windows. También hubo una versión de corta vida para Apple Macintosh.



Aqui un par de codigos en Pascal:

Programa que mencione si un triángulo es equilátero, isóceles o escaleno dados los tres lados:

Program triangulo;
uses crt;
var
     a,b,c:real;
begin
     clrscr;
     write('Dame los datos del triangulo:');
     readln(a,b,c);
     if (a=b) and (b=c) then
          begin
               writeln('equilatero');
          end
     else
          begin
               if (a=b) or (b=c) or (a=c) then
                    begin
                         writeln('isoceles');
                    end
               else
                    begin
                         writeln('escaleno');
                    end;
          end;
     readkey;
End.

Programa que muestre una factura:

Program factura;
 
Uses crt;
 
const porciva=0.09;
 
var
    desc:integer;
    cantidad:integer;
    precio:real;
    subtotal,montoiva,total:real;
 
Begin
     clrscr;
     writeln('tipee cantidad de articulos:');
     readln(cantidad);
 
     writeln('tipee el precio del articulo:');
     readln(precio);
 
     subtotal:=cantidad*precio;
     montoiva:=subtotal*porciva;
     total:=montoiva+subtotal;
 
     writeln('el subtotal es',subtotal:8:2);
     writeln('el montoiva es',montoiva:8:2);
     writeln('el total vendido es',total:8:2);
 
End.

Link:
http://freakshare.net/files/dva0w2cr/Turbo-Pascal.rar.html