array unidimensionales y multidimensionales; record; set

type vector= array [1..5] of integer; fecha = array [i..3] of integer;

var notas: vector; i:int; fech_ing:fecha;

begin fech_1[1]:=15; fech_[2]:=03; fech_3[3]:=1994; cost max_array=15 type vector = array [1..max_array] of real; rango+1..10; vector2= array[1..rango] of boolean;

inicializacion de arreglos
(*todo en cero*) for (i:= 1) to 10 do a[i]:=0; (*2,4,6,..., 20*) for 1:= 2 to 10 do a[i]:=2*i; (*desde la entrada*) for i: 1 to 10 do readln(a[i]); investigar: recorrido de arreglos, buscar un elemento en el arreglo, ordenar el arreglo. recorrido de arreglos

la estructura de control for ees la adecuada para recorrer completamente un