Estructuras simples de datos

ARRAYS


Arrays de considera una colección de datos del mismo tipo yuxtapuestos en memoria y referenciados por un identificador.

Ejemplos

Tabla[3]:= 7  -----> Inserta el valor 7 en la fracción de tabla numero 3.

Writeln(‘tabla[3]’)

Para trabajar con arrays, hay que declarar el tipo del array y después hay que crear las variables y seleccionar el tipo establecido anteriormente como podemos ver en los siguiente ejemplos.

TYPE

       TAnombres= ARRAY[1..60] OF Tcadena;

       TAcursos= ARRAY[1..5] OF INTEGER;

       TAprecios=ARRAY[tprecios] OF REAL;

VAR

       Anombre : TAnombres;

       Acursos: TAcursos;


Como ordenar un array?

REGISTROS

Es una agrupacion de datos de tipo distinto referenciado con un identificador.

Ejemplo

TYPE

TFicha = Record

Nombre:string(40);

Edad:integer;

Casado:Boolean;

END;

TAFicha = Array[1..60] OF Tficha

VAR

Fichas : TAFicha;

(**************************************************)

Como en arrays, se pueden introducer registros dentro de otros registros

è Acceso a los registros

Fichas[10].Edad:=’…………….’;

(*Si hay un registro dentro de otro registro, se accedería mediante

Fichas[10].coche.matricula:=’…………………..’;

è Tambien se puede hacer de la forma

WITH Fichas[4] DO

               Write(`DNI’); Readln(dni);

               .

               .

               END;

Ejercicios

Ejercicio 0         Ejercicio 11         Ejercicio 22         Ejercicio examen 
Ejercicio 1         Ejercicio 12         Ejercicio 23         Ejercicio examen 2
Ejercicio 2         Ejercicio 13         Ejercicio 24         Ejercicio examen 3
Ejercicio 3         Ejercicio 14                                    Ejercicio examen 4
Ejercicio 4         Ejercicio 15                                    Ejercicio examen bombones
Ejercicio 5         Ejercicio 16
Ejercicio 6         Ejercicio 17
Ejercicio 7         Ejercicio 18
Ejercicio 8                                                                  Registro variante
Ejercicio 9         Ejercicio 20
Ejercicio 10                                  Ejercicio 33