Programacion

Nociones básicas
n
n

Todas las sentencias deben terminar en punto y coma (;)
excepto la última sentencia que termina con punto (.)
Los programas en Pascal se componen de:
n

Cabecera:

n

Declaraciones

PROGRAM identificador;

PASCAL

CONST
Iden_cte = valor_cte;

VAR
Iden_var : tipo_var;
n

Sentencias
n

Se pueden incluir comentarios e n cualquier parte de unprograma
pero deben delimitarse con llaves o con paréntesis y asterisco:
{
(*

esto es un comentario
y esto también

}

*)

PASCAL

Estructura básica de un
programa en Pascal

Variables y Constantes
n

n

Los identificadores son nombres para referenciar variables, cons tantes
y funciones. Se forman con letras (A-Z), números (0-9) y símbolo de
subrayado ( _ ) pero deben comenzarcon una letra. Pueden tener
cualquier longitud pero sólo se reconocen los 63 primeros caracteres
Los tipos de datos básicos utilizados en Pascal son:
n
n
n
n
n

n

n

PROGRAM nombre;
CONST
nom_cte1 = valor1;
MMMMMMMMMMMMMMMMMMMMM

INTEGER: Entero
REAL: Real
CHAR: Carácter
BOOLEAN: Lógico/Booleano
STRING: Cadena de caracteres

nom_cteN = valorN;

VAR
nom_var1 : tipo1;MMMMMMMMMMMMMMMMMMMMM
nom_varN : tipoN;

En Pascal, las variables deben declararse antes de ser utilizadas en
una sección de declaración de variables dentro del programa. Esta
sección comienza con la palabra VAR
Las constantes también deben inicializarse en la sección de
declaración de constantes. Esta sección comienza con la palabra
CONST

PASCAL

BEGIN
MMMMMMMMMMMMMMMMMMMMM
sentencias;MMMMMMMMMMMMMMMMMMMMM

END.
3

PASCAL

Estructuras secuenciales
n

Operación de asignación
Operación de Entrada/Lectura:
READ(lista parámetros);
READLN(lista parámetros);

n

Operación de Salida/Escritura:
WRITE(lista parámetros);

n

WRITELN(lista parámetros);
WRITELN;

PASCAL

4

Estructuras condicionales

var := exp ;

n

2

5

IF condición THEN
BEGINSentencias en caso verdadero
END
[ELSE
BEGIN
Sentencias en caso falso
END];
Nótese que el ‘;’ únicamente se
pone al final de la sentencia IFTHEN-ELSE

PASCAL

n

n

Si el grupo ‘Sentencias en caso
verdadero’ (y/o ‘Sentencias en caso
falso’) está formado por una única
sentencia, el par BEGIN -END no es
necesario
IF condición THEN
S1
[ELSE
S2];

Sentencia CASE
CASE var O FValor_1:S1;
Valor_2:S2;
MMMMMMMMMMMMMMM
Valor_n:Sn;
END;

6

1

Estructuras repetitivas
Bucle FOR

n

FOR var:=inicio TO/DOWNTO fin DO
BEGIN
Cuerpo del bucle
END;

Bucle WHILE

n

n

WHILE condición DO
BEGIN
Cuerpo del bucle
END;

Bucle REPEAT-UNTIL

n

n

REPEAT
Cuerpo del bucle
UNTIL condición;

Otros temas
n

Si ‘cuerpo del bucle’ (en la
sentenciaFOR y WHILE) está
formado por una única
sentencia, el par BEGIN- END
no es necesario
Nótese que la sentencia
REPEAT-UNTIL no necesita un
par BEGIN- END puesto que el
cuerpo del bucle queda
perfectamente delimitado con
REPEAT al principio y UNTIL al
final

PASCAL

Para dar formato de salida a los números reales:
WRITE(exp_real:n_col:n_dec)

donde n_col es el número decolumnas/posiciones que va a ocupar
el número y n_dec el número de decimales que queremos mostrar
en pantalla
n

Para hacer uso de ‘unidades’ (librerías con funciones y
procedimientos predefinidos) se utiliza la siguiente sentencia entre
la cabecera y la sección de declaración del programa:
PROGRAM nombre;
USES unidad;
CONST
MMMMMMMMMMMMMMMMMMMMM

7

PASCAL

Declaración de funciones yprocedimientos

Sección TYPE

FUNCTION ident_func (parámetros formales):tipo;
{Declaración variables locales}
BEGIN
Sentencias;
ident_func :=expresión;
END;

n

Se utiliza para declarar nuevos tipos de datos o
renombrar tipos ya definidos
TYPE
nombre-1 = tipo-1;
nombre-2 = tipo-2;
…………………………
…………………………
…………………………
nombre-N = tipo-N;

PROCEDURE ident_proc (parámetros formales);...