30 de Marzo de 2012

VECTORES Y MATRICES (ARRAYS):

- Vector: Es un tipo de dato compuesto y estático. Todos son del mismo tipo.
   Declaración
      Nombre: ARRAY[1.....n] de tipo
      Ej.: números:ARRAY[1.....5] de entero



1. Manipulación. Usamos el formato nombrearray[posicion_del_elemento]
      Ejemplos:
      numeros[1]<--39 //Asigna el valor 39 a la posición 1 del array

       a<--numeros[3]  //Asigna a la variable 'a' el valor de la posición 3 del vector números

       leer(numeros[2])  //Lee un número de teclado y lo introduce en la pos. 2

       escribir(numeros[4])  //Escribe en pantalla el número de la pos. 4


Ejemplo:


b:cadena
a:entero
v:ARRAY[1...3]de cadena
a<--2
b<--v[a]  //Leo del array la posición 'a' para asignárselo a 'b'


2. Recorrido. Nos permite recorrer todas las posiciones de un vector.
      Ejemplo:


i:entero

vector:ARRAY[1...100]de entero
PARA i=1 HASTA 100
INICIO
ESCRIBIR(vector[i])  
FIN




Ejercicio resuelto. Declarar un vector de 20 posiciones de tipo entero y leer de teclado 20 números enteros que los guardaremos en el vector. Por último, escribimos en pantalla aquellos elementos guardados en el vector que sean impares.

PROGRAMA vector

INICIO
VAR
   i:entero

   a:entero

   numeros:ARRAY[1...20]de entero

PARA i=1 HASTA 20

INICIO

   ESCRIBIR("Introduce 1 número entero.")

   LEER (a)         //*

   numeros[i]<--a   //*

FIN
PARA i=1 HASTA 20
INICIO
   SI (numeros[i]mod2)<>0
   INICIO
      ESCRIBIR(i," ")
   FIN
FIN
FIN

Esta es una posible solución. Otra forma de programarlo sería sustituir las 2 líneas con //* por:


LEER(numeros[i])


A continuación, con todo lo aprendido hasta ahora vamos a reescribir el programa de las fechas que hicimos el día anterior:



PROGRAMA fecha

INICIO
VAR
   d:entero
   m:entero
   a:entero
   meses:ARRAY[1...12]de cadena
LEER(d,m,a)
meses[1]<--"Enero"
meses[2]<--"Febrero"
...
meses[12]<--"Diciembre"
ESCRIBIR("La fecha introducida es: ",d," de ",meses[m], " de ",a)
FIN


En la segunda parte de clase le tocó a Juanma realizar su exposición que fue sobre virus informáticos.