Inicio
>
1. SESIONES
>
1.8 Arrays unidimensionales
|
Anterior
Siguiente
|
|
|
|
Sesión
Prevista para el 19 Diciembre 2008
|
|
Declaración de un array estático como una constante |
Escribir en pantalla el contenido
de un array estático |
Program declara_array_estatico_cte;
const a: array [1..4] of integer = (13,23,37,43);
begin
end.
|
Program escribe_array_estatico_cte;
const
i_inf = 1;
i_sup = 4;
a: array [i_inf..i_sup] of integer = (13,23,37,43);
var i:integer;
begin
for i:= 1 to 4 do
Writeln('El valor de
la posición ', i, ' es: ', a[i])
end.
|
|
Escribir en pantalla el contenido de un array estático,
definido como una constante, utilizando un procedimiento. |
|
|
|
|
|
|
Declaración de un array dinámico como una variable (los
arrays dinámicos no se pueden definir como constantes) |
Escribir en pantalla el contenido de un array dinámico |
Program declara_array_dinamico;
var a: array of integer;
begin
end.
|
Program escribe_array_dinamico;
var
a:array of integer;
i:integer;
begin
setLength(a,4);
for i:= low(a) to high(a) do
Writeln('El valor de
la posición ', i, ' es: ', a[i])
end. |
Observar que, a diferencia del ejemplo del array estático, no se
conoce su tamaño a priori (antes del programa principal) |
Observar:
- Un array dinámico tiene que dimensionarse (hay que asignarle
un tamaño) en el programa y no en la sección de declaración de
variables(y esto siempre antes de ser utilizado en el programa).
- Para hacer referencia a sus índices inferior y superior se utilizan
las funciones low y high
|
|
Escribir en pantalla el contenido de un array dinámico
utilizando un procedimiento. |
|
|
|
|
Resolver este ejercicio de dos formas distintas:
- En primer lugar, considerar conocido (como una constante) el número
de líneas del fichero de texto (e.d. la cantidad de valores)
- A continuación, hacer el programa para que acepte ficheros de cualquier
tamaño (Nota: es necesario conocer en el programa el número de líneas
del fichero).
|
|
|
|
|
|
|
|
|
|