Programación en Pascal

PROCEDIMIENTO Intercambio(var a,b:entero)
ENTRADA: a,b
SALIDA: a,b
VARIABLES: aux
INICIO
aux ← a
a ← b
b ← aux
FIN
PROCEDURE Intercambia(var a,b:integer);
VAR: aux
BEGIN
aux := a;
a := b;
b := aux;
END;
Como podemos observar el paso de seudocódigo a pascal es inmediato, sólo es necesario
recordar las reglas de sintáxis y algunos aspectos básicos.
• Los subalgoritmos terminan con (;) y no con (.)
• Los parámetros pasados por referencia se distinguen por llevar igualemente la partícula
var. Se pasan por valor en caso contrario.
• Nunca se realizan operaciones de entrada/salida en un procedimiento o función, toda la
información entra y sale como parámetro.
La pregunta ahora es determinar cuando un parámetro es pasado por valor o por referencia.
Para ello nos ayudará la siguiente tabla:
Para cada parámetro tipo de dato tipo de dato
simple
estructurado
de entrada por valor por referencia
de salida o de
entrada/salida
por referencia por referencia
Esto nos ayuda a saber porqué los parámetros a,b y c de la función está pasados por valor
(son de entrada y simples), mientras que los parámetros a y b del procedimiento son pasados
por referencia (son de entrada y salida al mismo tiempo).
Ahora estamos en disposición de modificar el programa que calcula el punto de intersección
entre dos rectas. Sería muy conveniente mantener un subalgoritmo con esta operación y
simplemente hacer una llamada siempre que nos interese, de este modo, basta con escribirlo
una vez y utilizarlo siempre que fuera necesario.
Atendiendo al programa, vemos que:
• El procedimiento queda después de la definición del programa, las constantes y variables y
antes del programa principal.
• Se consideran comentarios lo que quede entre llaves o entre los símbolos (*...*)
• La entrada/salida se realiza en el programa principal, no en el procedimiento, a no ser que
sea un procedimiento exclusivo de entrada o salidada.
• El procedimiento se invoca mediante una llamada. Los parámetros se corresponden por
posición, no por nombre. Así pendiente1 se corresponden con el parámetro m1, const1 con
c1, y así sucesivamente.
• Los parámetros x e y (coinciden en nombre por casualidad) son pasados por referencia
porque son de salida.
6