Pascal (lenguaje de programación)

Pascal es un lenguaje de programación desarrollado por el profesor suizo Niklaus Wirth entre los años 1968 y 1969 y publicado en 1970. Su objetivo era crear un lenguaje que facilitara el aprendizaje de programación a sus alumnos, utilizando la programación estructurada y estructuración de datos. Sin embargo con el tiempo su utilización excedió el ámbito académico para convertirse en una herramienta para la creación de aplicaciones de todo tipo.

Pascal se caracteriza por ser un lenguaje de programación estructurado fuertemente tipificado. Esto implica que:

1. El código está dividido en porciones fácilmente legibles llamadas funciones o procedimientos. De esta forma Pascal facilita la utilización de la programación estructurada en oposición al antiguo estilo de programación monolítica.
2. El tipo de dato de todas las variables debe ser declarado previamente para que su uso quede habilitado.

El nombre de Pascal fue escogido en honor al matemático Blaise Pascal.

Niklaus Wirth

Niklaus Wirth (Winterthur Suiza, 15 de febrero de 1934), científico de la computación.

En 1959 obtiene el título de Ingeniero en Electrónica en la Escuela Politécnica Federal de Zúrich (ETH) en Suiza. En 1960 obtuvo un M.Sc. de la Universidad de Laval, Canadá. En 1963 obtiene un Doctorado (Ph.D.) en la Universidad de California, Berkeley.

Wirth fue el jefe de diseño de los lenguajes de programación Euler, Algol W, Pascal, Modula, Modula-2 y Oberon. También ocupó gran parte de su tiempo en el equipo de diseño e implementación de sistemas operativos Lilith y Oberon para el Lola en el diseño del hardware digital y el sistema de simulación.

Características Unicas

A diferencia de lenguajes de programación descendientes de C, Pascal utiliza el símbolo ":=" para la asignación en vez de "=". Si bien el segundo es más conocido, la práctica ha demostrado que muchos usuarios utilizan el símbolo de igualdad para comparar valores en lugar del comparador de C que es el símbolo ==. Esta sintaxis conduce a muchos errores o bugs difíciles de rastrear en código C. Dado que Pascal no permite asignaciones dentro de expresiones y utiliza sintaxis distintas para asignaciones y comparaciones, no sufre estos errores.

Además sus programas tienen definidas dos partes: declarativa y ejecutiva. En la primera debe aparecer todo lo que se usará en la segunda, de lo contrario se detecta como desconocido y evita ciertas incomprensiones como veremos más adelante. En la parte declarativa se enuncian Unit existentes, procedimientos, funciones, variables, constantes y nuevos tipos de datos estructurados.

Otra diferencia importante es que en Pascal, el tipo de una variable se fija en su definición; la asignación a variables de valores de tipo incompatible no están autorizadas (en C, en cambio, el compilador hace el mejor esfuerzo para dar una interpretación a casi todo tipo de asignaciones). Esto previene errores comunes donde variables son usadas incorrectamente porque el tipo es desconocido; y también evita la necesidad de notación húngara, que vienen a ser prefijos que se añaden a los nombres de las variables y que indican su tipo

Analisis de un Lenguaje de Programación

Compiladores disponibles públicamente

Varios compiladores de Pascal están disponibles para el uso del público en general:

• Epox
• Compilador GNU Pascal (GPC), escrito en C, basado en GNU Compiler Collection (GCC). Se distribuye bajo licencia GPL.
• Free Pascal está escrito en Pascal (el compilador está creado usando Free Pascal), es un compilador estable y potente. También distribuido libremente bajo la licencia GPL. Este sistema permite mezclar los codigos de mas utilidad en el mercado de la programacion, y soporta muchas plataformas y sistemas operativos.
• Turbo Pascal fue el compilador Pascal dominante para PC durante los años 1980 y hasta principios de los años 1990, muy popular debido a sus magníficas extensiones y tiempos de compilación sumamente cortos. Actualmente, versiones viejas de Turbo Pascal (hasta la 7.0) están disponibles para descargarlo gratuito desde el sitio de Borland (es necesario registrarse).
• Delphi es un producto tipo RAD (Rapid Application Development) de Borland. Utiliza el lenguaje de programación Delphi, descendiente de Pascal, para crear aplicaciones para la plataforma Windows. Las últimas versiones soportan compilación en la plataforma .NET.
• Kylix es la versión más nueva de Borland reiterando la rama de Pascal de sus productos. Es descendiente de Delphi, con soporte para el sistema operativo Linux y una librería de objetos mejorada (CLX). El compilador y el IDE están disponibles para uso no comercial. Actualmente este proyecto está descontinuado.
• Lazarus es un clon de Delphi, basado en Free Pascal es software libre.
• MidletPascal para la plataforma J2ME.
• TMT. Pascal.

Implementaciones

Las primeras versiones del compilador de Pascal, entre ellas la más distribuida fue UCSD Pascal, traducían el lenguaje en código para una máquina virtual llamada máquina-P. La gran ventaja de este enfoque es que para tener un compilador de Pascal en una nueva arquitectura de máquina solo hacía falta reimplementar la máquina-P. Como consecuencia de esto, solo una pequeña parte del intérprete tenía que ser reescrita hacia muchas arquitecturas.
En los años 1980, Anders Hejlsberg escribió el compilador Blue Label Pascal para la Nascom-2. Más tarde fue a trabajar para Borland y reescribió su compilador que se convirtió en Turbo Pascal para la IBM PC. Este nuevo compilador se vendió por $49, un precio orientado a la distribución masiva.

El económico compilador de Borland tuvo una larga influencia en la comunidad de Pascal que comenzó a utilizarlo principalmente en el IBM PC. En busca de un lenguaje estructurado muchos aficionados al PC reemplazaron el BASIC por este producto. Dado que Turbo Pascal sólo estaba disponible para una arquitectura, traducía directamente hacia el código máquina del Intel 8088, logrando construir programas que se ejecutaban mucho más rápidamente que los producidos en los esquemas interpretados.

Instrucciones básicas

Asignacion:

La asignacion se usa para dar valores a variables. La estructura de la instruccion es la siguiente:

a := b;

donde a y b se entienden que son variables correctamente definidas y del mismo tipo.

 

Muestreo por pantalla:

Para poder imprimir datos por pantalla usaremos la instruccion write. Su estructura es:

write(a);

donde a es una variable con datos guardados previamente.

En caso de que deseemos imprimir por pantalla cierto texto, deberemos escribir:

write("Texto que desea mostrar");

Programación en Pascal

Ejemplos de Lenguaje de Pascal

Raíz cuadrada

program raiz (input, output);

 uses crt;

 (*Obtener la raíz cuadrada de un número real x cualquiera*)

 var x, y: irreal;

 respuesta: string;

 begin

   writeln('** Calcular la raíz cuadrada de 12 **');

   writeln('Entrar x (> 0): ');

   readln(x);

   y := sqrt(abs(x)); (* Raíz cuadrada del valor absoluto de x para evitar raíces imaginarias *)

   writeln;

   if (x<0) then (* Si x es negativo, el resultado se notifica como imaginario *)

      writeln('La raíz cuadrada de ', x, ' es el número imaginario ', y,'i')

   else

   writeln('La raíz cuadrada de ', x, ' es ', y);

   writeln;

   writeln('** Fin **');

 end.

  

Suma

program suma; uses crt;                                                        

var x,s:integer;                                                              begin                                                                        

     clrscr;                                                                 

     x:=1;                                                                   

     s:=0;                                                                    

     repeat                                                                  

           s:=s+x;                                                           

           x:=x+1;                                                            

     until x=50;                                                             

     writeln('la suma es  ',s);  

Ciclos iterativos: While, For y Repeat

While

La instruccion while estudia primero la condicion y, en caso de que se cumpla, procedera a ejecutar la(s) instruccion(es) deseada(s).

Su estructura es:

while (condicion) do

 instruccion;

En caso de que haya mas de una instruccion a realizar, escribiremos:

while (condicion) do

 begin

  instrucciones;

 end;

For

El ciclo for realiza la(s) instruccion(es) deseada(s) durante un numero de vueltas predeterminadas. Este numero de vueltas no podra ser modificado NUNCA dentro del bucle, por lo que debemos tener cuidado en no tocar la variable indice (la que controla el numero de vueltas). Un ejemplo:

program pruebaFor;

CONST

 N = 10; { numero de vueltas que dara el bucle}

VAR

 i: integer; { variable que contara el numero de vueltas que llevamos}

BEGIN

 for i:=1 to N do

  writeln(i);

END.

Y se mostraria por pantalla:

1

2

3

4

5

6

7

8

9

10

En caso de que tengamos que ejecutar mas instrucciones dentro del bucle, escribiriamos:

for (contador) do

 BEGIN

  instrucciones;

 END;

Repeat

El bucle Repeat realiza una serie de instrucciones y, una vez hechas, comprueba una condicion. En caso de cumplirse, no volvera a repetir dichas instrucciones, y en caso contrario las ejecutara. Su estructura es:

repeat instruccion(es);until (condicion);