como trabaja un arreglo??

Los arreglos son básicamente esto:

Un caja dividida por cajitas mucho mas pequeñas, CADA CAJITA TIENE UN UNICO VALOR y un numero que la representa:

Valor
V
10 |20 |40
1 2 3
^
Numero

Estructura:
Para “declarar” un arreglo hay que hacer esto:

Nombre: array[1..3] of integer;

Nombre: nombre el cual tendrá el arreglo.
Array: el nombre sera un arreglo
[1..3]: 1 es el limite inferior y 3 el limite superior del arreglo.
Of integer: tipo de arreglo.

Ejemplo:
Nota:array[1..3]of integer;

(nota es declarado un arreglo que va desde 1 hasta 3. {3 notas})

Para llenar cada cajita se necesita de un contador y una lectura es decir:
El contador hara que después de cada lectura la próxima se haga en una cajita diferente.

Es decir:

Program arreglo1;
Uses crt;
Var
X:integer
Nota:array[1..3]of integer;

Begin
Clrscr:
X:=0;
Repeat
X:=x+1;
Writeln(‘ingrese la nota’);
Read(nota[x]);
Until
(x=3);
End.

Luego de declarado el arreglo se procede a dar el valor a cada cajita, cuando leemos en nota[x] estamos diciendo que vamos a agregar ese valor en el arreglo nota y [x] sera el numero de la cajita en la cual se guardara el valor.
Hacemos un contador (x) para que cada lectura valla desde la cajita 1 hasta la 3 donde finaliza el ciclo de repetición