Hoy en día existen muchos lenguajes de programación orientados hacia diferentes plataformas, como son los lenguajes visuales, tales como Visual BASIC, Delphi®, Visual C®, Visual Dbase®, entre muchos más, y los Lenguajes no visuales, entre estos están Cobol®, BASIC, Turbo Pascal®, Clipper®, C®, etc. El hecho esta que la principal diferencia entre uno y el otro es, en qué plataforma tienen que correr, los lenguajes visuales su característica principal es, que tienen que correr bajo el ambiente Windows® y los otros pueden correr tanto en MS-DOS® y en Windows®.

En este curso nos enfocaremos hacia el Lenguaje de Programación Turbo Pascal, la versión que se recomienda a utilizar es la 7, ya que el editor es más "amigable" en el aspecto de aquellas persona que están comenzando a manejarlo y no saben cuales son todas las palabras reservadas, ya que estas se resaltan de color blanco, y las demás palabras se distinguen de color amarillo, reconociendo de manera inmediata cuales son las palabras reservadas y si en un caso se escribió mal la palabra reservada. otra de las ventajas fueron mejoras en algunas funciones, bueno dejando aclarado ya lo anterior, pasamos a lo siguiente.

Un momento pero ¿Qué es una palabra reservada? Las palabras reservadas son todas aquellas palabras que son de uso exclusivo para el compilador y no se pueden utilizar como variables. Como por ejemplo:

Es una localidad de memoria que puede almacenar un tipo de dato especifico.

Existen cinco tipos de datos básicos:

Turbo Pascal provee cinco ya predefinidos tipos de datos enteros, como se demuestra a continuación:

Asimismo tiene 5 tipos de datos de punto flotante o en otras palabras, de decimales. Cada uno de los siguientes tipos tiene un rango especifico y precisión.

En Pascal no existe la diferencia en escribir las variables o palabras reservadas en minúsculas o mayúsculas, ya que el compilador no le da importancia y las toma por igual, ahora en el caso del lenguaje "C", a este si le importa. Lo que sí se recomienda es que se adopte un estilo de programación, ya que al cambiar de lenguaje es muy difícil pero no imposible, romper con una costumbre.

1. se debe de no mezclar al escribir con minúsculas y mayúsculas, (pero no es una regla)
2. utilizar la identación o sangría para una fácil localización de inicio y fin de bloques.

programa Ejemplo;
uses crt;
var i:byte;
begin
Writeln(‘Esto es un ejemplo...’);
for i:=1 to 10 do
begin
If i mod 2= 0 then
begin
writeln(‘esto es un par...’);
writeln(‘ y estoy en el bloque del if ‘)
end
else
begin
writeln(‘esto es un impar...’);
writeln(‘ estoy en el bloque del else ‘);
end;
end;
end.

Este es el mismo ejemplo con identación....

programa Ejemplo;
uses crt;
var i:byte;
begin
      Writeln(‘Esto es un ejemplo...’);
      for i:=1 to 10 do
      begin
            If i mod 2= 0 then
            begin
                  writeln(‘esto es un par...’);
                  writeln(‘ y estoy en el bloque del if ‘)
            end
            else
            begin
                  writeln(‘esto es un impar...’);
                  writeln(‘ y estoy en el bloque del else ‘);
            end;
      end;
end.

A simple vista uno se da cuenta cual de los dos programas es más fácil de entender y determinar que instrucciones están en determinado bloques...

Ya con estas dos recomendaciones, continuamos con conceptos básicos, lo que un principiante debe de conocer y saber distinguir.

Cuando uno es inexperto para programar nos surgen muchas dudas como declarar una variable en nuestro programa. Como antes mencionaba existen varios tipos de datos, pero por el momento nos enfocaremos a los cinco tipos principales. Para no crear confusiones y sea más sencillo utilizar los tipos. Existe una parte especifica donde las variables deben de ser declaradas, cabe destacar que no es como en Basic, si alguno de ustedes a manejado Basic o C, uno podía declarar las variables donde uno quisiera no importando en que lugar lo haríamos, en especial todas las variables que utilicemos en un programa, deben de estar ya previamente declaradas como tales. Al declarar las variables estas deben de contener ya sea letras y números o letras, no se aceptan variables que tengan caracteres especiales tales como :* , - , /, @, ¨ etc., ni espacios en blancos, otra cosa también que la primera letra de la palabra debe de ser una letra, en el caso que se quieran mezclar números y letras, ya que si colocan al principio de la declaración de la variable un número, se marcara error, por identificador no valido...

Ejemplos de variables:

La sintaxis de la declaración de una variable es la siguiente:
Var
      Identificador, identificador..:tipo;
      ...
      Identificador, identificador..:tipo;

 
Un ejemplo de declaración de una variable:

Programa ejemplo2;
Var dato1, dato2:integer;
      Cadena:string;
Begin
      {aquí va el código}
End.

Ya declare ya tres variables, dos que son de tipo entero y una de tipo cadena de caracteres.

Supóngase que usted tiene que resolver un pequeño programa que haga la suma de dos números y imprima en pantalla su resultado:

Programa ejemplo2;
Uses crt;
Var dato1, dato2:integer;
      Cadena:string;
Begin
      Clrscr;
      Write('Dame dato A :');
      Write('Dame dato B :');
End.

 
Existen una cantidad de posibles errores que suelen ocurrir ya sea en tiempo de compilación y en tiempo de ejecución, que son los que detecta turbo Pascal, pero hay un tipo de error que es el mate para cualquier programador y es el de tipo lógico, que son los errores más difícil para detectar, ya que depende de la habilidad del programador para evitarlos.

Por ejemplo: si se desea pasar esta ecuación a turbo Pascal

Z = A+B 

Siendo los valores A=10, B=5 y C=5, el resultado de la formula, lógicamente debe de ser 3.

En lenguaje de Pascal quedaría de la siguiente manera:

Z:=A+B/C;

No existe ningún error que pueda detectar el compilador, ya que esta correctamente escrito, si procedemos a evaluar la quedaría así

Z=10+5/5

Z=10+1

Z=10

Si nos damos cuenta el resultado es erróneo y esto se debió a que se interpreto mal la formula, ya que no se respetaron las prioridades, es decir, la suma de A y B, debió de ser primero que la división de B y C, este es un ejemplo típico de errores lógicos, la formula correcta quedaría así:

Z:=(A+B)/C

Ahora la evaluamos:

Z=(10+5)/5
Z=(15)/5
Z=3

Los errores en tiempo de compilación son aquellos en los cuales, escribimos mal el código y este nos señala el tipo de error que es, como una falta de punto y coma, falta paréntesis, se esperaba un identificador, etc.

Errores en tiempo de compilación son:

Estos son los errores en tiempo de ejecución:

En este momento estare trabajando en la proxima entrega, con más fundamentos de programación, desearia no llevarme mucho tiempo y tener para el jueves o viernes mas información, para ser colgada en esta pagina, desearia mucho tener una respuesta acerca de este curso y si hay interes para el aprendizaje de este tan bonito y preciado lenguaje.

Aquí les dejo un pseudocodigo, para que lo analizen y si lo pueden pasar a lenguaje Pascal, esta es una alternativa de muchas que hay...

Antes que nada declara las variables que se van a utilizar poco a poco van saliendo, ve colocando el nombre de la variable y con su tipo, es decir: TECLA ES UN CARÁCTER, etc...

A) Bueno lo primero que tienes que hacer es lo siguiente tener la lista de palabras cargadas en un archivo.

REPETIR
      LEER CADENA
      AÑADIR LA CADENA AL ARCHIVO
      LEER TECLA
HASTA TECLA= ‘N’

B) Despues leerlas y cargarlas si se te hace mas fácil en un arreglo de un tamaño adecuado para que entren las palabras que están en el archivo.

I ASIGNALE 0
MIENTRAS QUE NO SEA FIN DE ARCHIVO
      INCREMENTA I +1
      LEER CADENA DEL ARCHIVO
      AÑADIR LA CADENA AL ARREGLO[I]
END MIENTRAS

C) Ya que están cargadas en el arreglo determinar el orden en como quieres que se visualizen las palabras a descifrar, ya sea en ORDEN SECUENCIAL o en ORDEN ALEATORIO. Aquí ya viene lo bueno, la palabra se debe de colocar de la siguiente manera, para adivinarla.

Esta es la palabra clave
I N S T I T U T O

Y así se debe de desplegar en pantalla
__ __ __ __ __ __ __ __ __

Tienes que determinar cuantos intentos se van a aceptar, te propongo que sean de 3 a 5 intentos.

REPETIR
      INTENTOS ASÍGNALE 5
      NUM_INTENTOS ASIGNALE 0
      TOTAL ASIGNALE 0
      CADENA ASIGNALE VECTOR[ALEATORIO(I)]
      CADENA2 ASIGNALE CADENA
      GANO ASIGNALE VERDADERO
      LIMPIA PANTALLA
      GOTOXY(2,1)
      { POSICIONA EL CURSOR EN COLUMNA 2 Y FILA 1}
      FOR J ASIGNALE 1 HASTA EL TAMAÑO DE CADENA HACER
             ESCRIBE (‘_ ’)
      ENDFOR
      REPEAT
            ENCONTRADO ASIGNALE FALSE
            ESCRIBE (‘Dame una letra’)
            LEER (TECLA)
            FOR J ASIGNALE 1 HASTA EL TAMAÑO DE CADENA HACER
                  SÍ (CADENA[J]=TECLA) Y (CADENA2[J] <> ‘@’) ENTONCES
                        ENCONTRADO ASIGNALE TRUE
                        TOTAL ASIGNALE TOTAL + 1
                        GOTOXY(J+1)
                        ESCRIBE (TECLA)
                        CADENA2[J] ASIGNALE ‘@‘
                        SI TOTAL= TAMAÑO DE CADENA ENTONCES
                              GANO=VERDADERO
                        END SI
                  END SI
                  SI ENCONTRADO = FALSE ENTONCES
                        NUM_INTENTOS ASIGNALE NUM_INTENTOS ENDSI
            ENDFOR
      HASTA NUM_INTENTOS=5 Ó GANO=VERDADERO
      SI NUM_INTENTOS= 5 THEN
            ESCRIBE(‘PERDISTES...’)
            ESCRIBE (‘LA CADENA ERA ‘,CADENA)
      ENDSI
      ESCRIBE(‘DESEA DE NUEVO JUGAR [S/N]:’)
      LEER TECLA
HASTA TECLA=’N’

 
Este paso es ya pasarlo a código de Turbo Pascal o Quick Basic, si en algo no le entiendes mándame un Email.

Las cadenas si te das cuenta las manejo como si fueran arreglos y la verdad son arreglos pero de caracteres... (se aceptan cualquier comentario o mejoras relacionado al curso...)