opop

INSTITUTO NACIONAL
DPRO. COMPUTACION EDUCATIVA

INSTITUTO NACIONAL DEPARTAMENTO
DE COMPUTACION EDUCATIVA

GUIA Nº 3 PASCAL
2os. Medios

Profesores:
Luis González(l.gonzalez.ced@institutonacional.cl)
John Pereira (j.pereira.ced@institutonacional.cl)

INSTITUTO NACIONAL
DPRO. COMPUTACION EDUCATIVA

GUIA Nº 3 DE PASCAL
ARREGLOS UNIDIMENSIONALES
Un arreglo es un área de memoriautilizado para contener datos relacionados entre sí, el arreglo se divide
en elementos que deben tener todos el mismo tipo de datos y la misma longitud.
Utilizando un arreglo, podremos introducir unconjunto de datos completo utilizando solamente un
proposición de lectura dentro de un ciclo. Una vez que el conjunto de datos se ha almacenado en memoria,
podremos hacer referencia a cualquiera deestos datos cuantas veces queramos sin que tengamos que
volver a introducirlos de nuevo.
Declaración de arreglos:
Nombre : ARRAY [rango] OF tipo elemento
Nombre: nombre del arreglo
Rango: rangodel índice
Tipo elemento : tipo de datos que contendrá
Para trabajar con los elementos de un arreglo, se debe utilizar un índice, este puede ser un número o una
variable numérica entera.
Ejemplo:matriz :array[1..5] of string[10]; edad: array[1..5] of integer;
Ejemplos:
PROGRAM ARREGLO;
USES CRT; VAR
MATRIZ : ARRAY[1..5] OF INTEGER;
Y: INTEGER;
BEGIN
(* INGRESO DE DATOS A UN ARREGLO *)FORY:=1 TO5DO
BEGIN
WRITELN(’INGRESE UN NUMERO’);
READLN(MATRIZ[Y])
END;
(* DESPLIEGA DATOS DE UN ARREGLO *)
FORY:=1 TO5DO
BEGIN
WRITELN(‘NUMERO ‘,MATRIZ[Y], ' POSICIÓN ', ,Y);
DELAY(500);END;
END.
PROGRAM ARRE1;
USES CRT;
VAR
MATRIZ : ARRAY[1..5] OF STRING[10];
X, Y: INTEGER;
BEGIN
FORY-1 TOS DO
BEGIN
CLRSCR;
GOTOXY(5,5);WRITELN('INGRESE UN NOMBRE’);GOTOXY(25,5);READLN(MATRIZ[Y])

INSTITUTO NACIONAL
DPRO. COMPUTACION EDUCATIVA

END;
FORY.=1 TOS DO
BEGIN
WRITELN('NOMBRE ',MATRIZ[Y], 'POSICIÓN ',Y);
DELAY(1500);
END;
END.
PROGRAM ARRE2:
USES CRT;
VAR...