Diferencia entre revisiones de «Turbo Pascal»

De Wikipedia, la enciclopedia libre
Contenido eliminado Contenido añadido
m Revertidos los cambios de 69.19.14.41 (disc.) a la última edición de Spirit-Black-Wikipedista
Línea 36: Línea 36:
Fue sustituido por Borland [[Delphi]]
Fue sustituido por Borland [[Delphi]]


== Ejemplo ==[[Archivo:Ejemplo.jpg]]
== Ejemplo ==
[[Archivo:<source lang="pascal">
<source lang="pascal">
Program factura;
Program factura;


Línea 46: Línea 46:
var
var
desc:integer;
desc:integer;
cantidad:integer;[[Archivo:Ejemplo.jpg]]
cantidad:integer;
precio:real;
precio:real;
subtotal,montoiva,total:real;
subtotal,montoiva,total:real;
Línea 97: Línea 97:
End.
End.
</source>
</source>
]]


== Enlaces externos ==
== Enlaces externos ==

Revisión del 22:22 16 oct 2009

Turbo Pascal
Información general
Desarrollador Borland
Lanzamiento inicial 20 de noviembre de 1983
Archivos legibles

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ó cinco versiones de Turbo Pascal: 1,0, 3,02, 4, 5 y 5,5 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.

Enlaces externos