Turbo Pascal

Turbo Pascal
Información general
Desarrollador	Borland
Lanzamiento inicial	20 de noviembre de 1983
Archivos legibles
varios Turbo Pascal Desktop Turbo Pascal configuration Borland Turbo Pascal 5.5 compiled Unit Borland Turbo Pascal 6.0 compiled Unit Borland Turbo Pascal 7.0 compiled Unit Turbo Pascal Overlay Turbo Pascal Help (v2)

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.

Borland Pascal

El nombre de Borland Pascal fue generalmente reservado para los paquetes de gama alta para Microsoft Windows (con más bibliotecas y la biblioteca estándar de código fuente), mientras que la original, más barato y ampliamente conocida versión fue vendido como Turbo Pascal.

Versiones

Borland lanzó siete versiones de Turbo Pascal: 1.0, 3.02, 4, 5 , 5.5 , 6 y 7 para MS-DOS.

Fue sustituido por Borland Delphi

Ejemplo

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*preciou;
     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.

Una aplicación que realiza la suma de dos números digitados desde el teclado, luego hace la operación mostrando por último el resultado.

Program suma;
  
Uses  crt;
  
var 
    numero1:integer;
    numero2:integer;
    suma:integer;

Begin
  clrscr;

   writeln ('Escriba el primer numero');
   readln(numero1);

   writeln ('Escriba el numero 2');
   readln(numero2);

   suma := numero1 + numero2;

   writeln ('la suma es ', suma);

End.

Programa que muestra la factorial de un número leído desde el teclado:

program factorial;
  
uses  crt;
  
var
  facto,numero : integer;

function factorial(num : integer): integer;
var
 i,divisores : integer;
begin
  divisores := 1;
  for i := 1 to num -0 do
    begin
       divisores := divisores * i;
    end;
   factorial := divisores;
end;

begin
  clrscr;
  writeln ('Digite un número para calcular su factorial:');
  readln(numero);
  facto := factorial( numero );
  writeln ('La factorial es  ', facto);
  readkey;
end.

Enlaces externos

• Manual de programación en turbo pascal
• Tutorial de Pascal, centrado en Turbo Pascal y Free Pascal
• Museo de Borland, permite la descarga gratuita de software antiguo
• Turbo Pascal Community (en inglés y alemán)
• Curso de Turbo Pascal de Carlos Pes