ALGORITMOS Y PROGRAMAS:

TEMA 1:

Sistemas de procesamiento de la información.

Concepto de algoritmo.

Lenguaje de programación.

Datos, tipos de datos y operaciones primitivas.

Constantes y variables.

Expresiones: tipos y operadores.

Funciones internas.

La operación de asignación.

Entrada y salida de la información.

1. SISTEMAS DE PROCESAMIENTO DE LA INFORMACIÓN:

Un ordenador es una máquina de procesamiento de información. Es una máquina porque tiene cables, chips,... , procesa porque es capaz de procesar cosas, e información porque maneja conjuntos ordenados de datos).

Para procesar la información está el hardware (microprocesador, RAM,...), y el software (que sirve para manejar el hardware).

2. CONCEPTO DE ALGORITMO:

El algoritmo trata de resolver problemas mediante programas.

Fases:

• Análisis preliminar o evaluación del problema: Estudiar el problema en general y ver que parte nos interesa.

• Definición o análisis del problema: Ver que es lo que entra y que es lo que sale, las posibles condiciones o restricciones, ...

• Diseño del algoritmo: Diseñar la solución.

• El programa: Codificación del algoritmo en un lenguaje de programación.

• Ejecución del programa y las pruebas: Ver si el programa hace lo que queríamos.

¿Qué es un algoritmo?:

Es una formula para resolver un problema. Es un conjunto de acciones o secuencia de operaciones que ejecutadas en un determinado orden resuelven el problema. Existen n algoritmos, hay que coger el más efectivo.

Características:

• Tiene que ser preciso.

• Tiene que estar bien definido.

• Tiene que ser finito.

La programación es adaptar el algoritmo al ordenador.

El algoritmo es independiente según donde lo implemente.

3. EL LENGUAJE DE PROGRAMACIÓN:

Existen diferentes tipos, de bajo nivel y de alto nivel.

Instrucciones en una computadora y sus tipos:

Una instrucción es cada paso de un algoritmo, pero que lo ejecuta el ordenador. Un programa es un conjunto de instrucciones que ejecutadas ordenadamente resuelven un problema.

Tipos de instrucciones:

• E/S: Pasar información del exterior al interior del ordenador y al revés.

• Aritmético-lógicas: Aritméticas: +,-,*,... ; Lógicas: or, and, <, >, ...

• Selectivas: Permiten la selección de una alternativa en función de una condición.

• Repetitivas: Repetición de un número de instrucciones un número finito de veces.

Tipos de lenguajes:

• Lenguaje máquina: Todo se programa con 1 y 0, que es lo único que entiende el ordenador.

Ventaja: No necesita ser traducido.

Inconveniente: La dificultad, la confusión, para corregir errores, es propia de cada máquina.

• De bajo nivel o ensamblador: Se utilizan mnemotécnicos (abreviaturas).

Ventaja: No es tan difícil como el lenguaje máquina.

Inconvenientes: Cada máquina tiene su propio lenguaje, necesitamos un proceso de traducción.

• El programa escrito en ensamblador se llama programa fuente y el programa que se obtiene al ensamblarlo se llama programa objeto.

• Lenguajes de alto nivel: Los más cercanos al lenguaje humano.

Ventaja: Son independientes de cada maquina (los compiladores aceptan las instrucciones estándar, pero también tienen instrucciones propias).

Inconveniente: El proceso de traducción es muy largo y ocupa más recursos. Aprovecha menos los recursos internos.

Proceso de traducción y ejecución de un programa escrito en un lenguaje a alto nivel:

Usamos un editor y obtenemos el programa fuente, y el compilador es el que traduce el programa al lenguaje máquina. El compilador internamente ha sido diseñado para traducir.

El compilador obtiene el programa o el fichero objeto. El compilador tiene que buscar los errores.

Normalmente no sale un ejecutable, sino que necesita elementos, librerías, ...

Mediante un linkador juntamos el programa objeto y las librerías, y se forma un programa ejecutable.

Cuando se ejecuta el programa, el cargador lleva al programa a memoria para que éste pueda ser ejecutable.

Debbuger: Depura el programa ejecutándolo paso a paso, viendo la memoria paso a paso para encontrar el error.

Programa fuente (Editor)

Compilador

Error

Programa objeto Librerias

Linkador

Ejecutables

Para traducir puedo utilizar el compilador o un interprete, con el compilador cojo todo el programa al completo y el interprete lee cada instrucción y lo va ejecutando.

El interprete es más rápido, pero menos eficiente.

Todos los lenguajes tienen compiladores, pero no todos tienen interpretes.

LISP (Lenguaje de inteligencia artificial) : Sólo tiene interpretes.

4. DATOS, TIPOS DE DATOS Y OPERACIONES PRIMITIVAS:

- Dato: Es un objeto o elemento que tratamos a lo largo de diversas operaciones.

Tienen 3 caracteristicas:

• Un nombre que los diferencia del resto.

• Un tipo que nos determina las operaciones que podemos hacer con ese dato.

• Un valor que puede variar o no a lo largo de la operación.

Existen diferentes tipos de datos.

- Caracteristicas de los tipos:

• Cada tipo se representa o almacena de forma diferente en la computadora.

Bit:1/0; Byte=8 bits.

• Un tipo agrupa a los valores que hacen las mismas operaciones.

• Si tiene definida una relación de orden es un tipo escalar.

• Cardinalidad de un tipo: Número de valores distintos que puede tomar un tipo.

Pueden ser finitos (caracteres), y si son infinitos el ordenador los toma como finitos porque esta limitado por el tamaño de los bytes en el que la cifra es almacenada.

- Los datos pueden ser:

• Simples: Un elemento.

• Compuestos: Varios elementos.

- Los tipos pueden ser:

• Estandar: Que vienen en el sistema por defecto.

• No estandar: Son los que crea el usuario.

- Los tipos simples más importantes son:

• Numéricos.

• Lógicos.

• Caracteres.

• Numéricos:

• Entero: Subconjunto finito del conjunto matemático de los numéros enteros. No tiene parte decimal. El rango de los valores depende del tamaño que se les da en memoria.

• Real: Subconjunto finito del conjunto matemático de los números reales. Llevan signo y parte decimal. Se almacenan en 4 Bytes (dependiendo de los modificadores). Si se utilizan números reales muy grandes, se puede usar notación científica que se divide en mantisa, base y exponente; tal que el valor se obtiene multiplicando la mantisa por la base elevada al exponente.

• Lógicos o booleanos:

• Aquel que sólo puede tomar uno de los dos valores, verdadero o falso (1/0).

• Carácter:

• Abarca al conjunto finito y ordenado de caracteres que reconoce la computadora (letras, digitos, caracteres especiales, ASCII).

Tipo de cadena o String: Conjunto de caracteres, que van a estar entre “”.

El propio lenguaje puede añadir más tipos, o se pueden añadir modificadores.

Entero : Int Long int

En algunos lenguajes se definen tipos especiales de fecha y hora, sobre todo en los más modernos.

5. CONSTANTES Y VARIABLES:

• Constantes: Tienen un valor fijo que se le da cuando se define la constante y que ya no puede ser modificado durante la ejecución.

• Variables: El valor puede cambiar durante la ejecución del algoritmo, pero nunca varia su nombre y su tipo.

Antes de usar una variable hay que definirla o declararla, al hacerlo hay que dar su nombre y su tipo. El nombre que le damos tiene que ser un nombre significativo, va a ser un conjunto de caracteres que dependiendo del lenguaje hay restricciones. Tiene que empezar por una letra, y el tamaño depende del lenguaje.

Identificador: Palabra que no es propia del lenguaje.

El valor de la variable si al declararla no se la inicializa, en algunos lenguajes toma una por defecto. En cualquier caso el valor de la variable podemos darle uno incial o podemos ir variandolo a lo largo de la ejecución.

Las constantes pueden llevar asociados un nombre o no, si no lo llevan, se llaman literales. Su valor hay que darlo al definir la constante y ya no puede cambiar a lo largo de la ejecución, y en cuanto al tipo, dependiendo de los lenguajes en algunos hay que ponerlo, y en otros no hace falta ponerlo porque toma el tipo del dato que se le asigna. Const PI=3,1416.

Hay que inicializar todas las variables.

< > Hay que poner algo obligatoriamente.

[ ] Puede llevar algo o no llevarlo.

La ventaja de usar constantes con nombre es que en cualquier lugar donde quiera que vaya la constante, basta con poner su nombre y luego el compilador lo sustituira por su valor.

Las constantes sin nombres son de valor constante: 5, 6, `a', “hola”.

Cuando una cadena es de tipo carácter, se encierra entre `' `a'.

Relación entre variables y constantes en memoria:

Al detectar una variable o una constante con nombre, automaticamente se reserva en memoria espacio para guardar esa variable o constante. El espacio reservado depende del tipo de la variable.

En esa zona de memoria es en la que se guarda el valor asociado a la variable o constante y cuando el programa use esa variable, ira a esa zona de memoria a buscar su valor.

6. EXPRESIONES: TIPOS Y OPERADORES:

Una expresión es una combinación de constantes, variables, signos de operación, paréntesis y nombres especiales (nombres de funciones estandar), con un sentido unívoco y definido y de cuya evaluación resulta un único valor.

Toda expresion tiene asociada un tipo que se corresponde con el tipo del valor que devuelve la expresion cuando se evalua, por lo que habrá tantos tipos de expresiones como tipos de datos. Habra expresiones numéricas y lógicas.

Numéricas: Operadores aritméticos.

Son los que se utilizan en las expresiones numéricas (una combinación de variables y/o constantes numéricas con operadores aritméticos y que al evaluarla devuelve un valor numérico.

+, -, *, /.

Operación resto: Lo que devuelve es el resto de una división entera.

Mod: Pascal. 5 mod 3 = 2

%: C.

División entera: Nos devuelve el cociente de una división entera (en la que no se sacan decimales).

Div: Pascal. 5 div 3 = 1

\: C.

Potencia: ^ 5^2.

Todos estos operadores son binarios (el operador se situa en medio), el menos tambien puede ser unario (lleva un único operando) y significa signo negativo.

Reglas de precedencia:

El problema es cuando una expresión entera según como la evalue pueda dar diferentes valores.

7*3+4 25

49

La solución es aplicar prioridad entre los operadores, de modo que ante la posibilidad de usar varios siempre aplicaremos primero el de mayor prioridad.

Cada lenguaje puede establecer sus propias reglas de prioridad o precedencia de operadores. Si no nos acordamos, siempre podemos poner ( ).

1ª) ^

2ª) * / div mod

3ª) + -

Entre dos operaciones que tienen la misma precedencia para resolver la ambigüedad, hay que usar la regla de la asociatividad. La más normal es la de la asociatividad a izquierdas (primero lo de la izquieda).

Expresiones lógicas: Operadores relacionales y lógicos.

Una expresión lógica es aquella que sólo puede devolver dos valores (Verdadero o Falso). Los valores que pueden aparecer en una expresión lógica son de 2 tipos: lógicos y relacionales.

La particularidad de las expresiones lógicas es que mientras en una expresión numérica por devolver un valor numérico los operandos solo pueden ser números, en una expresión lógica los operandos no tienen porque ser booleanos aunque se devuelva un valor booleano. Esto es lo que ocurre cuando en la expresión lógica utilizamos operadores relacionales con lo cual se obtienen valores lógicos o booleanos a partir de otros que no lo son.

En cambio cuando los operadores son lógicos los operandos obligatoriamente tambien tienen que ser lógicos.

Operadores relacionales:

<

>

=

<> en C: !=

"

"

< Operando1> operador < Operando2>

5 > 3 Verdadero

¿Cómo se evalua una expresión relacional?:

• Primero se evalua el primer operando y se sustituye por su valor.

• Luego se evalua el seguno operando y se sustituye por su valor.

• Finalmente se aplica el operador relacional y se devuelve el valor booleano correspondiente.

((3*2)+1-5^2) < (2-1)

-18 < 1 Verdadero.

El problema del tipo real:

Desde la informática, los numeros reales son finitos, ya que tenemos un máximo de cifras decimales. Cuando trabajamos con un =, matematicamente da un valor exacto, pero informaticamente no es exacto.

1/5 * 5 =1

1.0/5.0 *5.0 <>1.0

Soluciones:

• La que nos aporte el propio lenguaje de programación. Se considera un valor de error.

• Trabajar con números enteros siempre que sea posible.

• Utilizar las comparaciones <> en vez de " " si es posible.

• Si hay que preguntar por igual, cambiar la condición utilizando valores absolutos y un valor mínimo de error.

Si la diferencia < 0.00000001 y ABS (A-B)< min ; son iguales.

Operadores lógicos:

El problema es que a veces queremos preguntar o evaluar por más de una condición al mismo tiempo y para esto estan los operadores lógicos.

Y and &&

O or !!

No not ~!

Y, O, son operadores binarios (necesitan 2 operandos de tipo logico).

Operando 1 Operador Operando 2

El No es unario y se coloca primero el No, y despues el operando.

El resultado es lógico y depende de:

Operando 1	Operando 2	AND	OR
V	V	V	V
V	F	F	V
F	V	F	V
F	F	F	F

El No niega :

NOT	1/0
V	F
F	V

Prioridades de los operadores:

• Lo más prioritario es el NOT

• Luego el Y y el O.

• <, > =,...

Tabla de prioridades:

^ NO

/ div mod y

+ - O

<, >, =, <>,...

7. FUNCIONES INTERNAS:

Son funciones matemáticas diferentes de las operaciones básicas pero que se incorporan al lenguaje y que se consideran estandar. Dependen del lenguaje. Normalmente se encuentran en la librería de matemáticas del lenguaje de programación.

Fórmulas:

Abs (x)

Arctan (x)

Cos (x)

Sen (x)

Exp (x)

Ln (x)

Log 10 (x)

Redondeo (x)

Trunc (x)

Cuadrado (x)

Raiz (x)

8. OPERACIÓN DE ASIGNACIÓN:

Consiste en atribuir un valor a una variable. El valor sera una expresión (constante, variable,...).

• Otros lenguajes = , :=

Variable a la que se le asigna el valor el valor que le vamos a asignar.

A 5

En C A = = B Comparación

A = B Asignación

En Pascal A:=B Asignación

A=B Comparación

El proceso de asignacion se realiza en 2 fases:

• Se evalúa la expresión de la parte derecha de la asignación obteniendose un único valor.

• Se asigna ese valor a la variable de la parte izquierda.

¿Qué es lo que hay que tener en cuenta?:

• En la parte izquierda sólo puede haber una variable.

• La variable a la que se le asigna el valor pierde su valor anterior.

• La variable que aparece en la derecha ya que como se evalua primero la de la derecha cuando se tenga que evaluar el valor de esa variable se tomara su valor antiguo.

• EL TIPO DEL VALOR QUE SE OBTIENE AL EVALUAR LA PARTE DERECHA TIENE QUE SER EL MISMO QUE EL TIPO DE LA VARIABLE DE LA PARTE IZQUIERDA, ES DECIR A UNA VARIABLE SOLO SE LE PUEDEN DAR VALORES DE SU MISMO TIPO.

- En Pascal da un error.

- En C, no da error porque el compilador trunca el numero.

A: entero

A 2

A 3*A + A = 8

9. ENTRADA Y SALIDA DE LA INFORMACIÓN:

Las dos operaciones básicas de cada salida son las de lectura y de escritura. La lectura es equivalente a la asignación en cuanto que va a haber una variable que recibe un valor, pero este valor no resulta de evaluar ninguna expresión, sino que el valor lo vamos a leer de un dispositivo externo de entrada.

Leer (nombre de la variable)

El valor introducido por el dispositivo externo, tiene que ser del mismo tipo del que la variable que se le asigne.

La operación de escritura lo que hace es mostrar el valor de una variable en un dispositivo externo de salida.

Escribir (variable)

La operación de escritura no es una operación destructivo en memoria.

Al pedir un valor al usuario hay que decirle que es lo que se le quiere pedir escribiendo un mensaje.

EJERCICIOS: TEMA 1

A (3*2^5 mod 1 + 8*(3-5) < (2+8-1 mod 1)

A (3*32 mod 1 + (-16)) < 10

A -16 < 10

A Verdadero

1.1. A A o (3+5*8) < 3 y ((-6/3 div 4)*2 < 2)

A Verdadero o 43 < 3 y (0*2 < 2)

A Verdadero o Falso y Verdadero

A Verdadero o Falso

A Verdadero

B 3 mod 2 div 3

B 1 div 3

B 0

C (-B*2 <> 8*3 mod 4) y (`A'>'B')

C (0 <> 24 mod 4) y Falso

C Falso y Falso

C Falso

A C o no (3=5) y (8 <> 3+B)

A Falso o Verdadero y Verdadero

A Falso o Verdadero

A Verdadero

RESOLUCIÓN DE PROBLEMAS CON COMPUTADORA Y HERRAMIENTAS DE PROGRAMACIÓN:

TEMA 2

Resolución de problemas.

Análisis del problema.

Diseño del algoritmo.

Resolución en la computadora.

Flujogramas.

Diagramas NS o de NASSI-SCHEDERMAN

Pseudocódigo.

1. RESOLUCIÓN DE PROBLEMAS:

La resolución de un problema desde el punto de vista algorítmico tiene 3 fases:

• Análisis del problema: Comprensión.

• Diseño del algoritmo: Resolución algorítmica.

• Resolución en computadora: Implantación del algoritmo en un lenguaje de programación.

2. ANÁLISIS DEL PROBLEMA:

El objetivo de ésta fase es comprender el problema para lo cual como resultado tenemos que obtener la especificación de las entradas y salidas del problema. Tiene que quedar claro que entra y que sale.

3. DISEÑO DEL ALGORITMO:

Una vez comprendido el problema se trata de determinar que pasos o acciones tenemos que realizar para resolverlo.

Como criterios a seguir a la hora de dar la solución algorítmica hay que tener en cuenta:

Si el problema es bastante complicado lo mejor es dividirlo en partes más pequeñas e intentar dividirlo en partes más pequeñas e intentar resolverlas por separado. Esta metodología de “divide y vencerás” también se conoce con el nombre de diseño descendente.

Las ventajas de aplicar esto son:

• Al dividir el problema en módulos o partes se comprende más fácilmente.

• Al hacer modificaciones es más fácil sobre un módulo en particular que en todo el algoritmo.

• En cuanto a los resultados, se probarán mucho mejor comprobando si cada módulo da el resultado correcto que si intentamos probar de un golpe todo el programa porque si se produce un error sabemos en que módulo ha sido.

Una segunda filosofía a la hora de diseñar algoritmos es el refinamiento por pasos, y es partir de una idea general e ir concretando cada vez más esa descripción hasta que tengamos algo tan concreto para resolver. Pasamos de lo más complejo a lo más simple.

La representación de los algoritmos:

Una vez que tenemos la solución hay que implementarla con alguna representación. Las representaciones más usadas son los flujogramas, los diagramas NS y el pseudocódigo.

También la solución se puede escribir en algunos casos en lenguaje natural pero no se hace porque es muy ambiguo, e incluso otras formas de expresión como fórmulas matemáticas.

Escritura del algoritmo:

Al escribir el algoritmo hay que tener en cuenta:

• Las acciones o pasos a realizar tienen que tener un determinado orden.

• En cada momento solo se puede ejecutar una acción.

• Dentro de las sentencias del algoritmo pueden existir palabras reservadas (palabras propias del lenguaje de programación que tienen para el compilador un determinado significado).

• Si estamos utilizando pseudocódigo tenemos también que usar la identación (aumenta la legibilidad del problema para que se pueda leer mejor).

4. RESOLUCIÓN EN LA COMPUTADORA:

Es hacer entender nuestro algoritmo a la computadora para que lo pueda hacer.

Codificamos el algoritmo en un leguaje de programación.

Ejecutar el programa antes compilado.

Comprobar los resultados y si no funciona, corregirlo.

5. FLUJOGRAMAS:

Es una notación gráfica para implementar algoritmos. Se basa en la utilización de unos símbolos gráficos que denominamos cajas, en las que escribimos las acciones que tiene que realizar el algoritmo.

Las cajas están conectadas entre sí por líneas y eso nos indica el orden en el que tenemos que ejecutar las acciones.

En todo algoritmo siempre habrá una caja de inicio y otra de fin, para el principio y final del algoritmo.

Los símbolos:

Líneas de flujo: Una línea con una flecha que sirve para conectar los símbolos del diagrama y la flecha indica la secuencia en la que se van a ejecutar las acciones.

Símbolo de proceso: Indica la acción que tiene que realizar la computadora. Dentro escribimos la acción.

Representa las acciones de entrada y salida. Dentro colocaremos las acciones de lectura y escritura.

Condición: Dentro se va a colocar una condición. Sirve para representar estructuras selectivas y repetitivas y lo que se hace al encontrar ese signo es evaluar la condición que hay dentro tal que según la condición sea verdadera o falsa iremos por caminos distintos.

Principio y fin: Dentro del símbolo ira la palabra inicio o fin del algoritmo.

Subprograma: Dentro se coloca el nombre del subprograma al que se llama.

Conectores: Nos sirven cuando un flujograma no me cabe en una columna de la hoja y hay que seguir en otra columna:

• Si es en la misma hoja:

• Si es en hoja distinta:

Los conectores se ponen uno donde termina la columna y otra donde empieza.

Es una aclaración para entender mejor el código, pero no es parte del código, no se ejecuta.

Otros símbolos:

- Pantalla: Cuando una salida es por pantalla.

- Teclado: Para representar una entrada por teclado.

- Impresora:

- Entrada/Salida por disco:

*Problema:

Queremos hallar el producto de varios números positivos introducidos por teclado y el proceso termina cuando se meta un número negativo.

Iniciar la variable del producto.

Leer el primer número.

Preguntar si es negativo o positivo.

Si es negativo nos salimos y escribimos el producto.

Si es positivo, multiplicamos el número leído y luego leemos un nuevo número, y se vuelve al paso 3.

Inicio

P 1

Leer num

Num >= 0 Escribir P

P P * num Fin

Leer num

5. DIAGRAMAS N-S O DE NASSI-SCHEDERMAN:

Es semejante al flujograma, peor sin flechas y cmabiando algo los símbolos de condición y repetición. Las cajas van unidas.

<acción>

Condiciones:

Condición

SI NO

<acc1> <acc2>

Repetitivas:

Mientas <cond> <acciones> Desde vi=v1 hasta vn

<acciones>

Repetir hasta <cond> <acciones>

Problema anterior:

Inicio

P 1

Leer num

Mientras num >= 0

P p*num

Leer num

Escribir P

Fin

6. PSEUDOCÓDIGO:

Es un lenguaje de especificación de algoritmos, pero muy parecido a cualquier lenguaje de programación, por lo que luego su traducción al lenguaje es muy sencillo, pero con la ventaja de que no se rige por las normas de un lenguaje en particular. Nos centramos más en la lógica del problema.

El pseudocódigo también va a utilizar una serie de palabras clave o palabras especiales que va indicando lo que significa el algoritmo.

Inicio y Fin: Por donde empieza y acaba el algoritmo.

Begin /end : Pacal.

{ } : En C.

Sí <cond>

Entonces <acc1> If then else

Sino <acc2>

3.Mientras <cond> /hacer while do

4. Repetir / hasta repeat until

5. Desde /hasta for .. to

Según sea Case

Swith

• Los comentarios van encerrados entre llaves.

• Hay que utilizar la identación.

Algoritmo <nombre alg>

Var

<nombre>: <tipo>

Inicio

<Instrucciones>

Fin

Algoritmo Producto

Var

P, num: entero

Inicio

P 1

Leer num

Mientras num >=0 hacer

P p*num

Leer num

Fin mientras

Escribir p

Fin

EJERCICIOS: TEMA 2

1. Realizar un programa que convierta los grados a radianes.

Algoritmo convertir

Var

Grados, rad: real

Inicio

Escribir “Introduce los grados”

Leer grados

Si grados >= 360

Entonces grados grados mod 360

Fin si

Rad grados / 180

Escribir rad “  radiantes”

Fin

2. Realizar un algoritmo que pida un valor entero que equivale a un número de duros y me calcule a cuantos billetes de 5000, 1000, monedas de 200, 25, 1.

Algoritmo cambio

Var

Duros: real

Inicio

Escribir “Introduce los duros”

Leer duros

Duros duros * 5

Escribir duros div 5000 “billetes de 5000”

Duros duros mod 5000

Escribir duros div 1000 “billetes de 1000”

Duros duros mod 1000

Escribir duros div 200 “monedas de 200”

Duros duros mod 200

Escribir duros div 25 “monedas de 25”

Duros duros mod 25

Escribir duros “monedas de 1”

Fin

3. Realizar un programa que pida al usuario la velocidad en m/s y el radio de la circunferencia de la pista, y resultada el programa devuelve el tiempo que tarda el atleta en dar 2 vueltas a la pista, sabiendo que el atleta descansa 1 minuto cada 1000 metros.

Algoritmo recorrido

Var

Velocidad,radio,tiempo,longitud: entero

Inicio

Escribir “Introduce la velocidad”

Leer velocidad

Escribir “Introduce el radio”

Leer radio

Longitud 4 * 3.1416 * radio

Descanso longitud div 1000

Tiempo longitud div velocidad + descanso * 60

Escribir tiempo

Fin

ESTRUCTURA GENERAL DE UN PROGRAMA

TEMA 3

Concepto de programa.

Instrucciones y tipos.

Elementos básicos de un programa.

Estructura de algoritmos y programas.

1. CONCEPTO DE PROGRAMA:

Un programa es un conjunto de instrucciones que al ser ejecutadas resuelven un problema.

Un programa tiene 3 partes:

Entrada de datos: Normalmente se va a ejecutar a través de instrucciones de lectura, y en lo que se le pide al usuario la información que el programa va a necesitar para ejecutarse y se hace a través de lecturas.

Acciones de un algoritmo: Parte en la que se resuelve el problema usando los datos de entrada.

Salida: Mostrar en un dispositivo de salida los resultados de las acciones anteriormente realizadas. Son acciones de escritura.

En la parte de las acciones a ejecutar se distinguirán dos partes:

• Declaración de variables.

• Instrucciones del programa.

2. INSTRUCCIONES Y TIPOS:

Para que una instrucción se ejecute tiene que ser llevada a memoria. En cuanto al orden de ejecución de las instrucciones, el programa puede ser de dos tipos:

• Programas lineales: Se va ejecutando una instrucción más otra y el orden de ejecución es igual al orden de escritura.

• Programas no lineales: Las instrucciones no se ejecutan en el mismo orden en el que aparecen escritas, sino que se realizan saltos que nos mandan de unas instrucciones a otras.

• Nunca se deben hacer saltos no lineales.

Tipos de instrucciones:

Inicio y fin.

Asignación: Dar un valor a una variable.

Lectura / escritura: Introducir o sacar información por dispositivos E/S.

Instrucciones de bifurcación: Alternan el orden de ejecución del programa. Salto a otra instrucción que no es la siguiente.

Bifurcación incondicional: El salto se produce siempre que el programa vaya a esa instrucción: Goto Ir a.

Bifurcación condicional: Se ejecutan un conjunto de instrucciones u otras dependiendo del valor devuelto al evaluar una condición.

Es la que vamos a usar.

3. ELEMENTOS BÁSICOS DE UN PROGRAMA:

¿Qué es la sintaxis de un lenguaje?:

Conjunto de reglas que tenemos que seguir a la hora de escribir un programa en ese lenguaje tal que si no seguimos esas reglas de sintaxis el compilador da errores.

Elementos del lenguaje de programación:

Palabras reservadas: Son un conjunto de palabras especiales que nos sirven para definir la estructura del programa, y solo se pueden usar para el fin para el que están reservadas.

Identificadores: Son los nombres que aparecen en el programa dados por el usuario. Son por tanto los nombres de variables, de constantes, de subprogramas y nombres de tipos creados por el usuario.

Caracteres especiales: Sirven como separadores entre sentencias, por ejemplo el ;.

Instrucciones: De 3 tipos, secuenciales, repetitivas y selectivas, y pueden aparecer elementos especiales (bucles, contadores, interruptores y acumuladores).

• Bucle: Un conjunto de instrucciones que se repiten un número finito de veces. Lleva asociado aparte de las instrucciones una condición que es la que determina cuando se termina un bucle. Ejecución de un bucle (iteración). Los bucles se pueden anidar unos dentro de otros, y puede haber varios bucles al mismo nivel, pero nunca se entrelazan.

• Contador: Un elemento cuyo valor se incrementa o decrementa en un valor constante en cada iteración de un bucle, y se utiliza para controlar la condición del bucle.

• Acumulador: Es una variable que también se suele usar en los bucles y que se incrementa o decrementa en cada iteración del bucle, pero no en una cantidad constante.

Algoritmo ejemplo

Var cont, num, sum: entero

Inicio

Cont 0

Sum 0

Mientras cont <> 3

Leer num

Sum sum + num

Cont cont +1

Fin mientras

Escribir suma

End

• Interruptor (marca, bandera o flag): Es una variable que sirve como indicador de una determinada información y que solo puede tomar uno de dos valores. El valor de la variable tiene asociado un signo y puede variar a lo largo de la ejecución.

Algoritmo ejemplo

Var cont, num, suma: entero

Neg: boolean

Inicio

Cont 0

Sum 0

Neg falso

Mientras cont <>3

Leer num

Si num < 0

Entonces neg verdadero

Fin si

Sum sum + num

Cont cont + 1

Fin mientras

Si neg=verdadero

Entonces escribir (“Se ha leído negativos”)

Sino escribir (“No negativos”)

Fin si

Fin

Si es leer un número negativo o hasta 3 números:

Mientras (cont <> 3) y (neg = verdadero)

4. ESCRITURA DE ALGORITMOS Y PROGRAMAS:

En pseudocódigo el programa tiene dos partes, la cabecera y el cuerpo. La cabecera contiene el nombre del algoritmo, y el cuerpo contiene 2 partes.

La primera es la zona de declaraciones de var y const, y la segunda es la zona de las instrucciones del programa.

En la zona de instrucciones para que quede más legible hay que usar la identación y si es necesario hay que usar comentarios entre llaves.

EJERCICIOS: TEMA 3

1. ¿Cuáles y cuántos son los números primos comprendidos entre 1 y 1000?

Algoritmo n_primos

Const

Primero=1

Limite=1000

Var

cont, i, j: entero

primo: boolean

Inicio

Cont 0

Desde i= primero hasta limite

primo verdadero

j 2

mientras (i>j) y (primo =verdadero)

Si i mod j = 0

Entonces primo falso

Sino j j + 1

Fin si

Fin mientras

Si primo = verdadero

Entonces escribir i” “

Cont cont + 1

Fin si

Fin desde

Escribir “Entre “primero” y “limite” hay “cont” nº primos”

Fin

2. Calcular el máximo de números positivos introducidos por teclado, sabiendo que metemos números hasta que introduzcamos uno negativo. El negativo no cuenta.

Algoritmo maximo

Var

Num, max: entero

Inicio

Max 0

Escribir “Introduzca nº positivos y para acabar introduzca uno negativo”

Leer num

Mientras num >=0

Si num >max

Entonces max num

Fin si

Leer num

Fin mientras

Escribir “El mayor número es” max

Fin

3. Determinar cuales son los múltiplos de 5 comprendidos entre 1 y N.

Algoritmo multiplos

Var

i: entero

Inicio

Desde i=1 hasta n

Si i mod 5 =0

Entonces escribir i

Fin si

Fin desde

Fin

INTRODUCCIÓN A LA PROGRAMACIÓN ESTRUCTURADA:

TEMA 4:

Técnicas de programación.

Programación modular.

Programación constructora.

Estructura secuencial.

Estructuras selectivas.

Estructuras repetitivas.

Anidación de bucles y condicionales.

Control de datos de entrada.

1. TÉCNICAS DE PROGRAMACIÓN:

El programar con flujogramas o diagramas NS resulta muy lioso en el momento en que el programa se complica, por eso vamos a utilizar siempre el pseudocódigo, en el que vamos a utilizar dos técnicas de programación que no se usan por separado, sino que son complementarios.

Estas técnicas son:

• Programación modular: Consiste en dividir el programa en partes llamadas módulos, e implementar cada uno de esos módulos por separado.

• Programación estructurada: Cuyo objetivo es hacer más legible y lógico la estructura del programa utilizando para ello solamente tres tipos de estructuras: selectivas, secuenciales (condicionales) y repetitivas.

2. PROGRAMACIÓN MODULAR:

Se basa en dividir el programa en partes llamadas módulos, que se analizan y codifican de forma independiente y que realizan una determinada tarea que será en realidad una parte del problema total a resolver.

En todo algoritmo o programa existirá un módulo o programa principal que es al que transfiere el control cuando comienza la ejecución del programa, y luego desde él, se va llamando al resto de los subprogramas.

Llamar a un subprograma quiere decir transferirle el control, es decir que se comienza a ejecutar y lo hará desde el comienzo del subprograma hasta que se termine y al terminar devuelve el control al subprograma que lo llamó. Dentro del subprograma a su vez también puedo llamar a otros pero en cualquier caso al final se devuelve el control al módulo que hace la llamada. El control al programa llamado se devuelve a la instrucción siguiente a la que se hizo la llamada.

Un módulo solo tiene acceso a los módulos a los que llama y a los submódulos a los que a su vez llaman éstos. Los resultados producidos por un módulo pueden ser utilizados por otros.

No existe un criterio fijo para determinar el tamaño, ni muy grandes ni muy pequeños, la idea fundamental es que realicen una única cosa y muy concreta.

Los módulos o subprogramas reciben diferentes nombres según el lenguaje de programación y según su tipo. Se llaman procedimientos y funciones (Pascal, C), subrutinas (basic, fortran), secciones (cobol),...

3. PROGRAMACIÓN ESTRUCTURADA:

La característica fundamental es que se va a basar en el uso únicamente de tres estructuras de control. Para ello se apoya en las siguientes filosofías:

Recursos abstractos: Son los recursos con los que no contamos a la hora de programar, pero en los que nos apoyamos a la hora de solucionarlos. Estos recursos se tienen que ir transformando en recursos concretos.

Diseño descendente (top down): Se trata de ir descomponiendo el problema en niveles o pasos cada vez más sencillos, tal que la salida de una etapa va a servir como entrada de la siguiente. En las primeras etapas tomamos el punto de vista externo, es decir, que entradas hay y que salidas hay, y a medida que vamos bajando de nivel, lo vamos viendo de modo interno (como lo hace por dentro).

Estructuras básicas de control: Para hacer cualquier programa siguiendo los anteriores pasos de razonamiento, al final codificamos el programa usando tres tipos de secuencias (repetitivas, alternativas y secuenciales).

Al final todo programa va a tener una única entrada y una única salida.

Desde la entrada tienen que existir caminos que nos permiten pasar por todas las partes del programa y llevarnos a la salida, y finalmente no se van a permitir los bucles infinitos.

4. ESTRUCTURA SECUENCIAL:

Es cuando una instrucción sigue a otra en secuencia, es decir, la salida de una instrucción es la entrada de la siguiente.

FLUJOGRAMA: DIAGRAMAS NS: PSEUDOCÓDIGO:

Leer num

Num num*2

Escribir num

5. ESTRUCTURAS SELECTIVAS:

Se evalúa la condición y en función del resultado se ejecuta un conjunto de instrucciones u otro. Hay tres tipos de selectivas (simple, doble o múltiple):

* Simple: Es la estructura : Sí <cond>

entonces <acciones>

fin sí

Evaluamos la condición y si es verdadera ejecutamos el conjunto de condiciones asociadas al entonces, y si es falso, no hacemos nada.

FLUJOGRAMA: DIAGRAMA NS:

<Cond1> Condición

SI NO

<acciones>

<acciones> <acciones>

* Doble: Se evalúa la condición y si es verdad se ejecutan el conjunto de acciones asociadas a la parte entonces, y si es falso se ejecutan el conjunto de acciones asociadas a la parte sino.

FLUJOGRAMA: DIAGRAMAS NS: PSEUDOCÓDIGO:

Si No

Cond Sí <cond>

Si Cond No Entonces <acciones>

Acc1 Acc2 Sino <acciones>

Acc1 Acc2 Fin si

Una condición se ejecuta una única vez.

* Alternativa múltiple: Se evalúa una condición o expresión que puede tomar n valores. Según el valor que la expresión tenga en cada momento se ejecutan las acciones correspondientes al valor. En realidad equivale a un conjunto de condiciones anidadas. En cualquier lenguaje, es Case o Swith.

PSEUDOCÓDIGO:

Según sea <expresión>

<Valor1>: <acción1>

<valor2>: <acción2>

.................................

[<otro>: <acciones>]

fin según

• Otro: Las acciones asociadas al valor otro se ejecutan cuando la expresión no toma ninguno de los valores que aparecen antes. Otherwise, Else.

El valor con el que se compara la expresión, va a depender de los lenguajes, de lo que sea ese valor. En general ese valor puede ser un valor constante, un rango de valores o incluso otra condición

FLUJOGRAMA: DIGRAMAS NS:

Expr Expresión

V1 V2 V3 V4 ... Otro

V1 V2 V3 V4 V5 V6

Hacer un programa que pueda dibujar una recta, un punto o un rectángulo.

Algoritmo dibujo

Var op: carácter

Escribir (“Introduce una opción”

Punto

Recta

Rectángulo”)

Leer op

Según sea op

“1”: leer x

.........

“2”: leer x

..........

“3”: leer x

..........

“otro”: escribir “opción errónea”

fin según

Para un rango de valores:

Leer una nota y escribir en pantalla la calificación:

Var nota: entero

Leer nota

Según sea nota

1..4: escribir “suspenso”

5..6: escribir “aprobado”

7..8: escribir “Notable”

9: escribir “Sobresaliente”

10: escribir “Matricula de honor”

fin según

En algunos lenguajes se permite poner una condición:

Según sea nota

Nota >=1 y nota <=4: escribir “suspenso”

En pseudocódigo no se pueden poner condiciones.

6. ESTRUCTURAS REPETITIVAS:

En aquella que contiene un bucle (conjunto de instrucciones que se repiten un número finito de veces). Cada repetición del bucle se llama iteración. Todo bucle tiene que llevar asociada una condición, que es la que va a determinar cuando se repite el bucle.

Hay cuatro tipos de bucles, aunque solo se pueden usar tres:

Mientras hacer While do

Repetir hasta repeat until

Desde for

Iterar loop : No se usa.

Mientras hacer:

Sintaxis:

PSEUDOCÓDIGO: FLUJOGRAMA: DIAGRAMAS NS:

Mientras <cond> hacer No

<acciones> Cond mientras cond

fin mientras Si

<acc1>

acciones

Funcionamiento:

La condición del bucle se evalúa al principio, antes de entrar en él. Si la condición es verdadera, comenzamos a ejecutar las acciones del bucle y después de la ultima volvemos a preguntar pro la condición. En el momento en el que la condición sea falsa nos salimos del bucle y ejecutamos la siguiente condición al bucle.

Al evaluarse la condición antes de entrar en el bucle al principio, si la condición al ser evaluada la primera vez es falsa, no entraremos nunca en el bucle, el bucle puede que se ejecute 0 veces, por tanto usaremos obligatoriamente este tipo de bucle en el caso de que exista la posibilidad de que el bucle pueda ejecutarse 0 veces.

Repetir hasta:

Sintaxis:

FLUJOGRAMA: DIAGRAMAS NS: FLUJOGRAMA:

acciones Repetir

<acc> <acciones>

hasta <condición>

No Si Repetir <cond> hasta

Cond

Función:

Se repite el bucle hasta que la condición sea verdadera. Se repite mientras la condición sea falsa. La condición se evalúa siempre al final del bucle, si es falsa volvemos a ejecutar las acciones, si es verdad se sale del bucle.

Como la condición se evalúa al final, incluso aunque la primera vez ya sea verdadera, habremos pasado al menos una vez por el bucle.

Es decir que cuando un bucle se tenga que ejecutar como mínimo una vez, podremos usar una estructura repetir o mientras, la única diferencia que habrá entre las dos, es que para hacer lo mismo, las condiciones tienen que ser contrarias.

Leer 3 números y dar su suma:

Cont 0 Cont 0

Suma 0 suma 0

Mientras cont <> 3 repetir

Suma suma + num leer num

Leer num suma suma + num

Cont cont + 1 cont cont + 1

Fin mientras hasta cont = 3

Desde:

Este tipo de bucles se utiliza cuando se sabe ya antes de ejecutar el bucle el número exacto de veces que hay que ejecutarlo. Para ello el bucle llevara asociado una variable que denominamos variable índice, a la que le asignamos un valor inicial y determinamos cual va a ser su valor final y además se va a incrementar o decrementar en cada iteración de bucle en un valor constante, pero esto se va a hacer de manera automática, el programador no se tiene que ocupar de incrementar o decrementar esta variable en cada iteración, sino que va a ser una operación implícita (lo hace por defecto).

Por tanto en cada iteración del bucle, la variable índice se actualiza automáticamente y cuando alcanza el valor que hemos puesto como final se termina la ejecución del bucle.

Sintaxis:

PSEUDOCÓDIGO:

Desde <var índice>=<valor inicial> hasta <valor final>

<acciones>

fin desde

FLUJOGRAMAS: DIAGRAMAS NS:

V Vi

Desde v=vi hasta v1

V <> V1 <sentencias>

sentencias

v v + 1

Bucle con salida interna: loop iterar.

Permite la salida del bucle desde un punto intermedio del mismo siempre que se cumpla la condicion que aparece, entonces nos salimos a la siguiente instrucción del bucle.

Iterar

<sent1>

salir si <cond> NUNCA SE USA

<sent2>

fin iterar

7. ESTRUCTURAS ANIDADAS:

Tanto las estructuras selectivas como los bucles se pueden anidar unos dentro de otros.

Anidación de condicionales:

La ventaja de anidar sentencias condicionales, es que cuando una se cumple no hay por que mirar a las que estan debajo. Tenemos que tratar anidar la condicion en la parte sino (else) en vez que en la parte entonces.

Si <condicion1>

Entonces <sentencia1>

Sino si <condicion2>

Entonces <sentencia2>

Sino si <condicion2>

Entonces <sentencia3>

Fin si

Fin si

Fin si

El case siempre equivale a una anidación de condicionales, pero no al reves.

Bucles anidados:

Al igual que podemos colocar unas expresiones dentro de otras, unos bucles pueden estar dentro de otros, pero nunca pueden cruzarse. Al anidar bucles hay que tener en cuenta que el bucle mas interno funciona como una sentencia mas del bloque mas externo y por tanto en cada iteración del bucle mas externo se van a ejecutar todas las iteraciones del bucle mas interno por cada iteración del mas externo.

Si el bucle mas externo se repite n veces y el mas interno se repite m veces, si por cada iteración del mas externo se repite el mas interno, el número total de iteraciones será m*n.

Los bucles que se anidan pueden se de igual o distinto tipo.

Desde i=1 hasta 8

Desde j=1 hasta 5

Escribir “Profesor”i”introduzca su asignatura nº”j

Leer asignatura

Fin desde

Fin desde

8. CONTROL DE DATOES DE ENTRADA:

1. Cuando existe un valor centinela que determina el fin del bucle:

El bucle se va a repetir mientras no se lea un determinado valor. La primera lectura se va a realizar fuera del bucle, y si la primera vez que lo leo ya encuentro ese valor centinela no podemos entrar en el bucle y seguirá a continuación, sino entramos en el bucle.

Se va utilizar una estructura Mientras.

2. Lectura secuencial de un fichero:

Tendremos que leer del primero al último registro del fichero. Habrá que usar un Mientras, aunque hay dos posibilidades: Leer fuera del bucle y al final de bucle, o leer dentro al principio del bucle. Se usa una u otra dependiendo del lenguaje.

3. Cuando en un bucle sabemos el número exacto de veces que se repite el bucle:

Usamos el Desde...Hasta.

4. Control de datos para no permitir datos erroneos:

No dejar seguir al usuario hasta que no introduzca datos correctos. Hay que usar un Repetir...Hasta.

Repetir Repetir

Leer datos leer op

Hasta (datos correctos) hasta (op>=1) y (op<=3)

EJERCICIOS: TEMA 4

1. Al final de curso deseamos saber cual ha sido el alumno de primero con mejor nota media. Se sabe que este año entraron 150 alumnos y que en primero todos tienen 5 asignaturas. Dar el nombre y la nota media.

Algoritmo nota_media

Const

Alumnos=150

Asignaturas=5

Var

Nombre, mejor_alum: cadena

Nota, suma, media, acum: real

I, j: entero

Inicio

Acum 0

Desde i=1 hasta alumnos hacer

Suma 0

Escribir “Introduzca el nombre del alumno”

Leer nombre

Desde j=1 hasta asignaturas hacer

Escribir “Introduzca la nota de la asignatura”

Leer nota

Suma suma + nota

Fin desde

Media suma / asignaturas

Si media > acum

Entonces acum media

Mejor_alum nombre

Fin si

Fin desde

Escribir “El mejor alumno es “mejor_alum

Escribir “Su nota media es “acum

Fin

2. Calcular la suma de los divisores de cada número introducido por teclado. Terminaremos cuando el número sea negativo o 0.

Algoritmo divisores

Var

Numero, i, suma :entero

Inicio

Escribir “Introduce un número, y para acabar uno negativo”

Leer número

Mientras numero > 0

Suma 0

Desde i=1 hasta numero /2

Si numero mod i =0

Entonces suma suma + i

Fin si

Fin desde

Suma suma + numero

Escribir “La suma de los divisores del número es “suma

Leer numero

Fin mientras

Fin

3. Se coloca un cápital C, a un interes I, durante M años y se desea saber en cuanto se habrá convertido ese capital en m años, sabiendo que es acumulativo.

Algoritmo interes

Var

I, j, m: entero

C, temporal: real

Inicio

repetir

Escribir “Introduce el capital, el interes y el tiempo”

Leer c, i, m

Hasta (c>0) y ((i<=0)y(i<=100)) y (m >=0)

Desde j=1 hasta m

C c * (1+I/100)

Fin desde

Escribir “Tienes “c” pts”

Fin

4. Dada una fecha en formato dia/mes/año determinar el número de días y el nombre del mes de dicha fecha, y sacar por pantalla la fecha convertida a formato de dia “de” mes “de” año.

Algoritmo fecha

Var

Dia, mes, año, n_dias: entero

N_mes: cadena

Inicio

Repetir

Escribir “Introduce la fecha en formato dia mes año”

Leer dia, mes, año

Según sea mes

1,01: n_mes “enero”

n_dias 31

2,02: n_mes “febrero”

si año mod 4=0

entonces n_dias 29

entonces n_dias 28

3,03: n_mes “marzo”

n_dias 31

4,04: n_mes “abril”

n_dias 30

5,05: n_mes “mayo”

n_dias 31

6,06: n_mes “junio”

n_dias 30

7,07: n_mes “julio”

n_dias 31

8,08: n_mes “agosto”

n_dias 31

9,09: n_mes “septiembre”

n_dias 30

10: n_mes “octubre”

n_dias 31

11: n_mes “noviembre”

n_dias 30

12: n_mes “diciembre”

n_dias 31

fin según sea

hasta (dia <=n_dias) y ((mes >=1)y(mes <=12)) y (año >=0)

escribir “El mes de “n_mes”tiene “n_dias” dias”

escribir “La fecha es: “n_dias” de “n_mes” de “año

fin

5. Dada la siguiente fórmula:

Averiguar el valor de x pidiendo al usuario los valores de n, a, b.

Algoritmo ecuacion

Var

N, a, b, primer, según, i, j: entero

X: real

Inicio

Primer 0

Según 1

Repetir

Escribir “Introduce el valor de n, a, b”

Leer n, a, b

Hasta n>=0

Desde i=1 hasta n

Primer (((a-b)^i -3)+n)+primer

Fin desde

Desde j=2 hasta n-1

Según ((2*a*(i-1))*según)

Fin desde

X primer / según

Escribir x

Fin

6. Dada la siguiente serie matemática:

a1=0

a2=0

an=an-1 + (2*an-2) para n>=3

Determinar cual es el valor y el rango del primer término cuyo valor sea mayor o igual a 2000.

Algoritmo serie

Var

A1, a2, an, cont: entero

Inicio

A1 1

A2 0

An a1 + (2*a2)

N 3

Mientras an < 2000

A2 a1

A1 an

An a1 + (2*a2)

Cont cont + 1

Fin mientras

Escribir “El rango es “cont” y el resultado es”an

fin

SUBPROGRAMAS: PROCEDIMIENTOS Y FUNCIONES.

TEMA 5

Introducción a los subprogramas o subalgoritmos.

Funciones.

Procedimientos.

Ámbitos: variables locales y globales.

Comunicación entre subprogramas: Paso de parámetros.

• Tipos y métodos de paso de parámetros.

• Paso de parámetros por copia.

• Paso de parámetros por referencia.

• Paso de parámetros por nombre.

Funciones y procedimientos como parámetros.

Efectos laterales.

Recursividad.

1. INTRODUCCIÓN A LOS SUBPROGRAMAS O SUBALGORITMOS:

La programación modular es una de las técnicas fundamentales de la programación. Se apoya en el diseño descendente y en la filosofía de “divide y vencerás”, es decir se trata de dividir el problema dado, en problemas más simples en que cada uno de los cuales lo implementaremos en un módulo independiente. A cada uno de estos módulos es a lo que llamamos subalgoritmos o subprogramas.

Siempre existirá un módulo o programa principal que es con el que comienza la ejecución de todo el programa, y a partir de él iremos llamando al resto.

Cada vez que se llama a un subprograma se le pasa la información que necesita en la llamada, a continuación comienza a ejecutarse el subprograma llamado, y cuando termine su ejecución, devuelve el control a la siguiente instrucción a la de llamada en el programa que lo llamó.

En cuanto a la estructura de un subprograma es igual a la estructura de un programa, va a tener una información de entrada que es la que le pasamos al hacer la llamada y que se coloca junto al nombre del subprograma. Después va a tener un conjunto de acciones, declarar otras variables propias del subprograma, y al terminar la ejecución puede que devuelva o no resultados al programa que lo llamó.

Hay dos tipos fundamentales de subprogramas: Funciones y procedimientos.

2. FUNCIONES:

Desde el punto de vista matemático, una función es una operación que toma uno o varios operandos, y devuelve un resultado. Y desde el punto de vista algorítmico, es un subprograma que toma uno o varios parámetros como entrada y devuelve a la salida un único resultado.

Pascal: En las funciones se puede devolver más de un único resultado mediante parámetros.

C: Se devuelve todo por parámetros.

Este único resultado irá asociado al nombre de la función. Hay dos tipos de funciones:

• Internas: Son las que vienen definidas por defecto en el lenguaje.

• Externas: Las define el usuario y les da un nombre o identificador.

Para llamar a una función se da su nombre, y entre paréntesis van los argumentos o parámetros que se quieren pasar.

Declaración de una función:

La estructura de una función es semejante a la de cualquier subprograma. Tendrá una cabecera (con el nombre y los parámetros) y un cuerpo(con la declaración de los parámetros de la función y las instrucciones).

Sintaxis:

Funcion <nombre_funcion> (n_parametro: tipo, n_parametro: tipo): tipo funcion

Var <variables locales funcion>

Inicio

<acciones>

retorno <valor>

fin <nombre_funcion>

La lista de parámetros es la información que se le tiene que pasar a la función. Los parámetros luego dentro de la función los podemos utilizar igual que si fueran variables locales definidas en la función y para cada parámetro hay que poner su nombre y tipo.

El nombre de la función lo da al usuario y tiene que ser significativo.

En las variables locales se declaran las variables que se pueden usar dentro de la función.

Entre las acciones tendrá que existir entre ellas una del tipo retorno <valor>. Esta sentencia pondrá fin a la ejecución de la función y devolverá el valor de la función, es decir, como valor asociado al nombre de mismo tipo que el tipo de datos que devuelve a la función, este valor por tanto tiene que ser del mismo tipo que el tipo de datos que devuelve la función, que es el que habremos indicado al declarar la función en la parte final de la cabecera.

No se permiten funciones que no devuelvan nada.

Los parámetros que aparecen en la declaración de la función se denominan parámetros formales, y los parámetros que yo utilizo cuando llamo a la función se denominan parámetros actuales o reales.

Invocación de una función:

Para llamar a una función se pone el nombre de la función, y entre paréntesis los parámetros reales, que podrán ser variables, expresiones, constantes,... pero siempre del mismo tipo que los parámetros normales asociados

<nombre_funcion> (parámetros reales)

La función puede ser llamada desde el programa principal o desde cualquier otro subprograma.

Para llamar a la función desde cualquier parte, implica el conocimiento previo de que ésta función existe.

A través de los parámetros reales de la llamada se proporciona a la función la información que necesita, para ello, al hacer la llamada lo que se produce es una asociación automática entre parámetros reales y parámetros formales. Esta asociación se realiza según el orden de la aparición y de izquierda y derecha.

Si el parámetro formal y real no son del mismo tipo, en Pascal se produce un error, y en C se transforman los tipos si es posible.

La llamada a una función, siempre va a formar parte de una expresión, de cualquier expresión en la que en el punto en la que se llama a la función, pudiera ir colocado cualquier valor del tipo de datos que devuelve la función, esto se debe a que el valor que devuelve una función esta asociado a su nombre.

Pasos para hacer la llamada a una función:

Al hacer la llamada y ceder el control a la función, se asocia (asigna el valor) de cada parámetro real a cada parámetro formal asociado, siempre por orden de aparición y de izquierda a derecha, por lo que siempre que no coincidan los tipos y el número de parámetros formales y reales, se produce un error.

Si todo ha ido bien, se ejecutan las acciones de la función hasta que lleguemos a una de tipo retorno <valor> que pondrá fin a la ejecución. Pueden existir varias sentencias de retorno en la misma función, pero en cada llamada solo se podrá ejecutar uno.

Se le asocia al nombre de la función el valor retornado y se devuelve el control al subprograma que hizo la llamada pero sustituyendo el nombre de la función por el valor devuelto.

Otra forma de especificar el retorno de una función:

Se le asigna el valor devuelto al nombre de la función.

N_funcion valor

Ejemplo de función:

Una función que calcule la mitad del valor que le paso parámetro. Suponemos que es un valor entero.

Funcion mitad (n: entero): real

Var m: real

Inicio

M n/2

Retorno m

Fin mitad

Algoritmo calc_mitad

Var num: entero

Inicio

Escribir “Introduce un número para hallar su mitad”

Leer num

Escribir “La mitad de “num” es “mitad(num)

Fin

* La función solo puede ser llamada desde una expresión.

3. PROCEDIMIENTOS:

El inconveniente de una función es que solo puede devolver un único valor, por lo que sí nos interesa devolver 0 o N valores, aunque puedo usarlo para devolver un solo valor, debo usar un procedimiento.

Un procedimiento es un subprograma o un subalgoritmo que ejecuta una determinada tarea, pero que tras ejecutar esa tarea no tienen ningún valor asociado a su nombre como en las funciones, sino que si devuelve información, lo hace a través de parámetros.

Al llamar a un procedimiento, se le cede el control, comienza a ejecutarse y cuando termina devuelve el control a la siguiente instrucción a la de llamada.

Diferencias entre funciones y procedimientos:

Una función devuelve un único valor y un procedimiento puede devolver 0,1 o N.

Ninguno de los resultados devueltos por el procedimiento se asocian a su nombre como ocurría con la función.

Mientras que la llamada a una función forma siempre parte de una expresión, la llamada a un procedimiento es una instrucción que por sí sola no necesita instrucciones.

Esta llamada consiste en el nombre del procedimiento y va entre paréntesis van los parámetros que se le pasan. En algunos lenguajes (como el C), se pone delante la palabra Llamar a (Call) procedimiento (parámetro).

Sintaxis:

Procedimiento <nombre_proc> (<tipo_paso_par> <nombre_par>: tipo_par,...)

Var <variables locales>: tipo

Inicio

<sentencias>

fin <nombre_proc>

La cabecera va a estar formada por el nombre del procedimiento que será un identificador y que debe de ser significativo, y luego entre paréntesis los parámetros o la información que se le pasa al procedimiento. Para cada parámetro hay que indicar el tipo de paso de parámetro. Hay dos tipos fundamentales de paso de parámetros, por valor y por referencia, si no ponemos tipo de paso de parámetros, se toma el tipo de paso de parámetros por valor.

En el cuerpo del procedimiento donde van las sentencias ya no habrá ninguna de tipo <retorno valor>, ahora bien, si el procedimiento devuelve resultados a través de sus parámetros, cosa que solo podrá hacer a través de los parámetros que se pasan por referencia, tendrán que existir sentencias de asignación de valores a estos parámetros pasados por referencia, a través de los cuales se van a devolver los resultados.

Como se llama a un procedimiento:

[llamar a (Call)] nombre_proc (par_reales)

Pasos para hacer la llamada a un procedimiento:

Se cede el control al procedimiento al que se llama y lo primero que se hace al cederle el control es sustituir cada parámetro formal de la definición por el parámetro actual o real de la llamada asociado a él. Esta asociación entre parámetros formales y reales se hace de izquierda a derecha por orden de colocación y para que se pueda producir esta asociación tienen que existir el mismo número de parámetros formales que reales, y además el tipo tiene que coincidir con el del parámetro formal asociado, sino se cumple alguna de estas condiciones hay un error.

Si la asociación ha sido correcta comienzan a ejecutarse las instrucciones del procedimiento hasta llegar a la última instrucción. Al llegar a la instrucción se vuelven a asociar los parámetros formales que devuelven los resultados a los parámetros formales asociados en la llamada, es decir, de esta manera algunos de los parámetros reales de la llamada ya contendrán los resultados del procedimiento.

Finalmente se cede el control a la siguiente instrucción a la que se hace la llamada, pero teniendo en cuenta que en esta instrucción y en las siguientes puedo usar ya los parámetros reales en los que se devolvieron los resultados del procedimiento para trabajar con ellos.

Procedimiento mitad (num:entero,ent-sal M:real)

Inicio

M num/2

Fin mitad

Algoritmo calc_mitad

Var

N: entero

Mit: real

Inicio

Escribir “Introduce un número”

Leer n

Mitad (n,mit)

Escribir “La mitad es”mit

fin

4. ÁMBITOS: VARIABLES LOCALES Y GLOBALES:

¿Qué es el ámbito de un identificador?:

El ámbito de un identificador (variables, constantes, funciones,...) es la parte del programa en la que se conoce y por tanto se puede usar un identificador.

Según el ámbito hay 2 tipos de variables, locales y globales:

Local: Aquella que está declarada y definida dentro de un subprograma luego su ámbito coincidirá con el ámbito del subprograma en la que este definida.

Esto quiere decir que la variable no tiene ningún significado, no se conoce y no se puede acceder a ella desde fuera del subprograma y que tiene una posición de memoria distinta a la de cualquier otra, incluso si es de una variable que tiene el mismo nombre pero que está definida fuera del subprograma.

Las variables locales a un subprograma se definen en la parte de la definición de variables del mismo. Los parámetros formales que se le ponen a un subprograma se comportan dentro de él como si fueran también variables locales a él.

Globales: Son las que están definidas a nivel del programa, es decir, su ámbito es el programa o algoritmo principal y todos los subprogramas que van junto con él.

A esta variable podemos acceder desde cualquiera de los subprogramas y el programa principal, salvo que alguno de esos subprogramas tenga definida una variable local con el mismo nombre que la variable global, en este caso si utilizo el nombre de esa variable me referiré a la local, nunca a la global(ya que tienen 2 zonas de memoria distintas).

Lugar en el que se definen las variables globales:

En algunos lenguajes se define en el programa principal, y esa variable será global, en otros lenguajes se definen fuera del programa principal y fuera de cualquier otro subprograma(antes de empezar el programa principal). Método que vamos a usar.

El problema de usar variables globales es que como todos los subprogramas las pueden modificar, puede ser posible que haya usos indebidos cuando un subprograma utiliza una variable global sin saber que otro la ha modificado, por esa razón nunca usaremos para pasar información entre los subprogramas variables globales, sino que usaremos variables de entrada-salida, salvo que no nos quede más remedio.

Procedimientos anidados:

La anidación de procedimientos no se permite en todos los lenguajes y consiste en que dentro de un procedimiento podamos definir o meter el código de otros.

Si la anidación de procedimientos está permitida, se plantean más problemas en cuanto al ámbito, desde este punto de vista, se dice que una variable local se conoce en el procedimiento en el que está definida y en todos los procedimientos anidados a él que son los que componen el ámbito de dicho procedimiento, salvo que en alguno de esos procedimientos anidados este definida una variable local con el mismo nombre en cuyo caso dentro de ese procedimiento siempre nos referiremos a la variable local definida en él porque siempre se considera el ámbito más restringido.

PP

Var A,B

P1

A,C,D

P2

A

P3

D,E

P4 D,F

P5

P6 F,A

VARIABLES	ÁMBITO SUBPROGRAMA
A del PP	P4,P5
B del PP	P1,P2,P3,P4,P5,P6
A del P1	P1,P3
C del P1	P1,P2,P3
D del P1	P1,P2,P3
A del P2	P2
D del P3	P3
E del P3	P3
D del P4	P4,P5,P6
F del P4	P4,P5
F del P6	P6
A del P6	P6

5. COMUNICACIÓN ENTRE SUBPROGRAMAS: PASO DE PARÁMETROS.

La mejor forma para llevar a cabo la comunicación ente subprogramas, es el paso de parámetros. Trataremos de evitar siempre que sea posible el uso de variables globales.

Cuando llamamos a una función o procedimiento, le pasamos a través de los parámetros la información que necesita, y en el caso de un procedimiento también devolvemos a través de sus parámetros los resultados. Para ello definiremos el tipo del parámetro a principio del subprograma, que es lo que conocemos como parámetros formales, y al hacer la llamada pasamos la información a través de los parámetros reales.

¿Cómo se efectúa la correspondencia entre parámetros formales y reales?:

Existen 2 métodos:

Correspondencia posicional: En este caso se emparejan los parámetros formales y reales por la posición que ocupan (orden de declaración) y de izquierda a derecha. Para que se pueda realizar esta asociación, tiene que haber el mismo número de parámetros formales y reales, y con el mismo tipo.

F (x:entero,y:real)

Var a:real

F (3,A)

Correspondencia por nombre implícito: Ahora en la llamada al subprograma se pone explícitamente a que parámetro formal corresponde cada real.

Ahora en la llamada ponemos el nombre del parámetro formal, separado por dos puntos (:) y el nombre del parámetro real que le pasamos, con lo cual ya no importa la posición en la que coloquemos la información.

F (x:3,y:A)

F (y:A,x:3)

Un lenguaje que permite esto es ADA.

Usaremos siempre el primer método (posicional).

Paso de parámetros:

Del modo de paso de parámetros va a depender el resultado que se obtenga.

1. Tipos de parámetros: Según se usen para meter datos o para obtener resultados.

Existen 3 tipos:

De entrada: Son parámetros que solo aportan información de entrada al subprogama en el que pertenecen como parámetros. Aporta el valor que tienen como entrada al subprograma. En el caso de una función, todos sus parámetros son de este tipo.

Como solo sirven como entrada, solo pueden ser leídos, pero no modificados, y aunque se modificasen dentro de un subprograma, fuera no va a tener efecto esa modificación.

De salida: Se usan solo y exclusivamente para devolver resultados a través de ellos. Su valor al hacer la llamada al subprograma no nos importa, sino que ese valor solo va a tener importancia cuando termina la ejecución del programa. Un parámetro de este tipo teóricamente nunca se puede leer, solo se va actualizar.

De entrada y salida: El valor del parámetro tiene importancia tanto a la entrada como a la salida del subprograma, nos aporta información cuando llamamos al subprograma y por otra parte devolvemos a través de él resultados cuando terminamos el subprograma, en este caso, tiene sentido tanto leer como actualizar el parámetro.

• Solo ADA es un lenguaje que va a soportar los 3 tipos de paso de parámetro. Se ponen como In, Out, In-Out.

• El resto de los lenguajes solo permiten dos tipos de parámetros, de entrada (solo para leer datos) y de entrada-salida (para devolver resultados, aunque también se puede usar para leer datos).

2. Métodos de paso de parámetros:

• Paso de parámetros por copia:

• Por valor.

• Por resultado.

• Por valor-resultado.

• Paso de parámetros por referencia.

• Paso de parámetros por nombre o nominal.

Paso de parámetros por copia:

La característica fundamental de este método de paso de parámetros es que el parámetro formal siempre se considera que tiene asociada una dirección de memoria en la que está almacenado y que por tanto se comporta igual que una variable local del subprograma en que aparece.

En este método lo que importa es el valor del parámetro actual.

Por valor: Nos interesa el valor del parámetro actual a la entrada, para ello este valor se copia en la dirección de memoria del parámetro formal asociado. En este caso el parámetro real puede se una constante, expresión o variable, y nunca se va a usar para devolver resultado a través de él, por esa razón precisamente puede ser una constante o una expresión, porque al no devolver resultados a través de él no necesita tomar ninguna zona de memoria en la que este almacenado, es más, incluso si el parámetro actual fuera una variable y la modificásemos dentro del subprograma (algo que no deberíamos hacer), fuera del subprograma no tendría ninguna repercusión esta modificación, es decir, esa variable serviría valiendo lo mismo en el programa desde el que se hace la llamada después y antes de hacerla.

El funcionamiento sería el siguiente:

• Al hacer la llamada al subprograma se evalúa el valor del parámetro real, y ese es el que se asocia, es decir, el que se guarda o asigna al parámetro formal asociado.

• Comenzamos a ejecutar el subprograma y si por casualidad se produce algún cambio en el parámetro formal, el parámetro actual no se verá afectado, es decir, su valor seguirá siendo el mismo en el subprograma desde donde se llama que antes de hacer la llamada al subprograma.

Algoritmo Ej

Var A:entero 3 3 6

Inicio A del PP X de P

A 3

P (A)

Escribir A

Fin

Procedimiento P(x:entero)

Inicio

X x*2

Escribir x

Fin p

El valor de A sería 3 y el de X sería 6.

Por valor-resultado: En el valor-resultado nos interesa el valor del parámetro actual tanto a la entrada como a la salida de la ejecución del subprograma.

Esto quiere decir que se cambia el valor del parámetro formal cambiará también el valor de su parámetro real asociado, cosa que no ocurría antes, y esto supone por tanto que ahora el parámetro real tiene que tener asociada obligatoriamente una dirección de memoria, por lo que siempre tendrá que ser una variable (no una constante ni una expresión).

El proceso sería el siguiente:

- Al hacer la llamada al subprograma se evalúa el parámetro real y su valor se copia en el parámetro formal asociado y al terminar la ejecución el valor del parámetro formal se vuelve a copiar en el parámetro real asociado.

Algoritmo Ej

Var A:entero Se copia

Inicio

A 3

P (A) 3 6 3 6

Escribir A P.Real P.Formal

Fin

Procedimiento P(x:entero)

Inicio Se devuelve

X x*2

Escribir x

Fin p

El valor de la A y la X sería 6.

Por resultado: Nos interesa el valor del parámetro real solamente a la salida o fin de la ejecución del subprograma en que aparece. Esto significa que al hacer la llamada no se copia el valor del parámetro real en el parámetro formal asociado, sin embargo a la salida se copia el valor del parámetro formal en la dirección del parámetro real asociado, esto significa por tanto, que el parámetro real tiene que tener asociada una expresión que tiene que ser una variable (no puede ser una constante o una expresión).

Algoritmo ej No se copia

Var A:entero

Inicio

A 3 P.Real P.Formal

P (A)

Escribir A

Fin

Procedimiento P(x:entero) Se copia a la salida

Inicio

X 1

X x*2

Escribir x

Fin p

El valor de A y de X es 2.

En la práctica la mayor parte de los lenguajes dentro del tipo de paso de parámetro por copia solo van a soportar el tipo de paso de parámetro por valor, que se usará cuando un parámetro solo lo quiero utilizar como entrada de información al subprograma, pero no para devolver resultados a través de él.

Los otros dos tipos de paso de parámetros por copia (por valor y por valor-resultado), no se implementan normalmente porque los efectos son prácticamente iguales que el paso de parámetros por referencia, es decir, cuando quiero usar un parámetro no solo para pasar información a través de él sino también para devolver resultados o si lo voy a usar sólo para devolver resultados, utilizaré el paso de parámetros por referencia que vamos a ver a continuación.

Para simbolizar que el tipo de paso de parámetros es por valor, en la definición del subprograma no pongo ningún tipo de paso de parámetros para ese parámetro, es decir, no poner ningún tipo significa que por defecto el tipo de paso de parámetros es por valor.

En el caso de las funciones como solamente pueden recibir información de entrada pero nunca pueden devolver información por sus parámetros ya que lo devuelven a través de la sentencia retorno y asociado a su nombre.

El tipo de paso de sus parámetros va a ser siempre por valor.

Paso de parámetros por referencia:

Ahora la característica principal de este tipo de paso de parámetros es que el parámetro formal va a tener también asignada una dirección de memoria en la que se almacena, pero en esa dirección NO SE GUARDA SU VALOR, sino que se almacena la dirección de su parámetro real asociado, es decir, el parámetro formal apunta al parámetro real que tiene asociado y cualquier modificación que se efectúe sobre el parámetro formal tendrá una repercusión directa en el parámetro real asociado ya que lo que modificará será el valor almacenado en la dirección que indica el parámetro formal que es la de su parámetro formal asociado.

El proceso será por tanto el siguiente:

• Al hacer la llamada al procedimiento en el parámetro formal que se pasa por referencia, se va a guardar la dirección del parámetro real asociado para que apunte a él.

• Durante la ejecución cualquier referencia al parámetro formal se hará accediendo a la dirección apuntada por dicho parámetro, es decir, accediendo directamente al parámetro real asociado, por lo que cualquier cambio en el parámetro formal afectará directamente al parámetro real asociado. De esta manera habremos pasado el resultado.

Para indicar que el tipo de paso de parámetro es por referencia, vamos a utilizar la palabra clave ent-sal precediendo al parámetro que se pasa por referencia.

A estos parámetros también se les llama parámetros variables (porque su valor varía), por eso en Pascal se usa la palabra clave Var para indicarlo.

En otros lenguajes como C, se usan como parámetros punteros para indicar que son direcciones.

Algoritmo EJ

Var A apunta

Inicio

A 3

P1(A) 3 dirección A

Escribir (A)

Fin A del PP X del P1

Procedimiento P1(ent-sal x:entero)

Inicio

X x*2

Fin P1

Por valor el parámetro actual no cambia de valor.

Por referencia el parámetro actual puede cambiar.

Paso de parámetros por nombre:

En este caso, el parámetro formal se sustituye literalmente por el parámetro actual asociado. Esta sustitución literal del parámetro formal por el parámetro actual no se produce hasta que no se usa el parámetro formal.

La ventaja es que si no usamos en ningún momento el parámetro formal dentro del subprograma llamado (cosa poco probable), no se tendrá que hacer ningún tipo de substitución.

Pero el gran inconveniente es que si se usa el parámetro formal, hay que ir a buscar en ese momento la expresión del parámetro real asociado.

El paso de parámetro por nombre es lo que se parece más a la substitución de parámetros en una función matemática.

F (x)= x+2

F (a+1) = a+1*2

F (x)= x+2

F (a+1)= a +1 2 <> (a+1)*2

Algoritmo EJ

Var A: entero

Inicio

A 3

P1(A+1)

Escribir (A)

Fin

Procedimiento P1(ent-sal x: entero)

Inicio

X x*2

Fin P1

Al final solo vamos a usar 2 tipos de paso de parámetros, que son los que usan casi todos los lenguajes: Por valor y por referencia.

Por valor: Solo lo usamos cuando un parámetro solo sirve para información de entrada, no devolvemos nada con él. Por eso este paso puede ser una constante, variable o expresión. Para simbolizarlo en la declaración de variables no ponemos nada.

Por referencia: Lo usamos cuando un parámetro lo usamos como entrada de información y como salida o solo como salida. Por esta razón ahora sí que se va a variar el parámetro formal y por lo tanto no podemos usar constantes ni expresiones, solo variables. Lo simbolizamos con la palabra ent-sal.

6. FUNCIONES Y PROCEDIMIENTOS COMO PARÁMETROS:

En la mayor parte de los lenguajes se permite también que una función o procedimiento pueda ser pasado como parámetro de otro subprograma. En este caso, es decir, cuando el parámetro formal es de tipo función o procedimiento, pasaremos como parámetro real funciones o procedimientos que tengan la misma definición que el que hemos puesto como parámetro formal, y en nuestro caso para indicar que se pasa como parámetro real una función o procedimiento, basta con poner su nombre.

Desde el subprograma al que se pasa como parámetro esa función o procedimiento podemos llamar en cualquier momento a esa función pasada como parámetro que en cada momento podrá ser una distinta dependiendo del parámetro formal asociado.

Funcion <nombre_f> (par:tipo;funcion <n_f>(x:entero,y:carácter):entero

Prodedimiento <nombre_f> procedimiento (x:tipo,...);...

Algoritmo EJ

Var v1,v2: entero

Inicio

V1 1

V2 2

P(v1,f1,v2)

P(v1,f2,v2)

Fin

Procedimiento P(x:entero;funcion F(A:entero;B:carácter):entero;ent-sal y:entero)

Inicio

X 2

Y F(x,'a')

Fin P

Funcion F1(x:entero;y:carácter):entero

Inicio

Escribir y

Retorno (x+1)

Fin

Funcion F2(A:entero;B:carácter):entero

Inicio

Escribir “Hola” B

Retorno A

Fin F2

El paso de funciones y procedimientos como parámetros, nos va a permitir que desde un subprograma podamos llamar a otros, pero teniendo en cuenta que el subprograma llamado no va a ser uno determinado, sino que va a depender en cada momento del subprograma pasado como parámetro real, de esta manera el subprograma puede llamar a un conjunto de n subprogramas que cumplan unas determinadas características, pero solo uno en cada momento.

No hay que confundir el paso de una función como parámetro con la llamada a una función cuando aparece como parámetro real en la llamada a un subprograma. Para diferenciarlo, cuando paso una función como parámetro solo pondré su nombre, en cambio cuando llamo a una función para pasar el valor que devuelve como parámetro pondré el nombre de la función y con sus argumentos para indicar que ahí se puede hacer la llamada. Esto se puede hacer porque la llamada a una función puede aparecer en cualquier expresión en la que apareciese cualquier valor del tipo de datos que devuelve.

Procedimiento P(A:entero)

Inicio

Escribir A

Fin P

Funcion F(x:entero):entero

Inicio

Retorno (x*2)

Fin F

Algoritmo EJ

Var I

Inicio

I 2

P(F(I)) Esto no es pasar una función como parámetro

Fin

7. EFECTOS LATERALES:

Un efecto lateral es cualquier modificación que un subprograma (sea función o procedimiento), realiza en elementos situados fuera de él pero sin hacer esas modificaciones a través del paso de parámetros.

Los efectos laterales siempre hay que evitarlos porque no somos conscientes o no controlamos que se han producido.

Para realizar comunicación entre subprogramas solo se hará a través del paso de parámetro para evitar los efectos laterales.

Los efectos laterales normalmente se producen por el uso de variables globales o variables locales que abarcan varios procedimientos (esto solo es posible si hay anidación de subprogramas). Por lo tanto evitaremos su uso excepto que sea imprescindible.

Var A:entero

Algoritmo EJ

Var B:entero

Inicio

B 1

A 2

P(B)

Escribir A

Fin

Procedimiento P(x:entero)

Inicio

A x+2

Fin P

8. RECURSIVIDAD:

Se dice que un subprograma es recursivo cuando se llama a sí mismo. La recursividad se va a poder usar en subprogramas que pueden definirse en términos recursivos, es decir, en termino de sí mismo, como procesos de alguna manera repetitivos.

La recursividad trataremos de evitarla siempre que sea posible, es decir, siempre que lo mismo se pueda solucionar con un bucle, ya que cada vez que un subprograma se llama a sí mismo hay que almacenar en la pila del sistema la dirección de retorno de ese subprograma, con lo cual si hacemos muchas llamadas recursivamente iremos llenando la pila del sistema, y se desbordara acabando con la memoria.

Todo programa recursivo tiene que tener alguna condición que ponga fin a la recursividad, es decir, que el programa deje de llamarse a sí mismo cuando se cumpla la condición, sino se formaría un bucle infinito.

Funcion potencia (base:entero;exp:entero):real

Var P:real

I:entero

Inicio

P 1

Desde i=1 hasta exp

P P*base

Fin desde

Retorno P

Fin

Funcion potencia (base:entero;exp:entero):real

Inicio

Si exp=0 entonces retorno 1

Sino

Retorno (base*potencia(base,exp-1)

Fin potencia

TEMA 5: EJERCICIOS

1. Implementar un subprograma que realice la serie de Fibonacci, que es:

Fibonacci (1)= Fibonacci (2)=1

N > 2 Fibonacci (n)= Fibonacci (n-1) + Fibonacci (n-2)

Algoritmo serie_fibonacci

Var

I, n: entero

Inicio

Escribir “Introduce un número”

Leer n

Desde i=1 hasta n

Escribir “La serie de fibonacci de “i” es “fibonacci (i)

Fin desde

Fin

Funcion fibonacci (num: entero): entero

Inicio

Si (num=1) o (num=2)

Entonces retorno 1

Sino

Retorno (fibonacci (num-1) + fibonacci (num-2)

Fin si

Fin fibonacci

2. Implementar un subprograma al que pasándole como parámetros 2 valores enteros M y N, me calcule el combinatorio

Algoritmo combinatorio

Var

M,n: entero

Inicio

Repetir

Escribir “Introduce el valor de M y N”

Leer m,n

Hasta m >n

Escribir “El combinatorio es “factorial (m) div (factorial(n)*factorial(m-n))

Fin

Funcion factorial (num: entero): real

Inicio

Si num=0

Entonces retorno 1

Sino

Retorno (num * factorial (num-1))

Fin si

Fin factorial

3. Implementar un subprograma que me halle cual es la primera potencia en base 2 mayor que un número que pasamos como parámetro, devolviendo el valor de dicha potencia y el exponente al que está elevado.

Algoritmo elevar

Var

Numero, resp1, resp2: entero

Inicio

Escribir “Introduce un número”

Leer numero

Comprueba (numero, resp1, resp2)

Escribir “2^”resp1”=”resp2” >”numero

Fin

Procedimiento comprueba (num: entero; ent-sal n: entero; ent-sal pot: entero)

Inicio

N 1

Mientras pot < n

Pot pot *2

N n+1

Fin mientras

Fin comprueba

4. Implementar un subprograma que calcule recursivamente en cuanto se convierte un capital C al final de N años y a un interés I.

Funcion calculo (c: entero;i: entero; n: entero): real

Inicio

Si m=0

Entonces retorno C

Sino

Retorno (c*(1+i/100)+calculo (c,i,n-1)

Fin si

Fin calculo

5. Calcular el primer término de la siguiente serie que sea mayor o igual a un valor V que se le pasa como parámetro y me devuelva el lugar que ocupa en la serie y el valor.

Ai=0

An=n+(An-1)!

Funcion factorial (num: entero): entero

Var

I, acum: entero

Inicio

Acum 1

Desde i=1 hasta num

Acum acum * i

Fin desde

Retorno acum

Fin factorial

Procedimiento serie (v: entero; ent-sal an: entero; ent-sal n: entero)

Var

A1: entero

Inicio

A1 0

An 0

N 1

Mientras an <= V

N n+1

An n + factorial (a1)

A1 an

Fin mientras

Fin serie

6. Calcular el valor de la serie donde N es un valor que se pasa como parámetro al subprograma que hace el cálculo.

Funcion suma (n: entero): real

Var

I, j: entero

X, y, acum1, acum2, suma1, suma2: real

Inicio

Acum1 0

Acum 2 0

Desde i=0 hasta n

X 1/n

Acum1 acum1 + x

Fin desde

Desde j=0 hasta n-1

Y 1 +i*acum1 + y

Fin desde

Retorno acum2

Fin suma

7. ¿Qué se escribe en pantalla tras la siguiente ejecución?

Algoritmo EJ

Var

A,B,C: entero

Inicio

A 1

B 2

C A+3

P1 (A, B-C, C)

C C - F(A)

P2 (A,C)

P1 (C, B, A)

Escribir A, B, C

Fin

Procedimiento P1 (ent-sal x: entero; y: entero; ent-sal z: entero)

Inicio

X y +z

Y x +1

Z y * 2

Fin P1

Procedimiento P2 (ent-sal x: entero; y: entero)

Inicio

X x +1 -y

Y 3

Fin P2

Funcion F (x: entero): entero

Inicio

X x + 3

Retorno (x - 1)

Fin F

• La solución es A=8; B=2; C=3

ESTRUCTURAS DE DATOS: ARRAYS.

TEMA 6

Introducción a las estructuras de datos.

Arrays unidimensionales o vectores.

Operaciones con arrays unidimensionales o vectores.

Arrays bidimensionales o matrices.

Arrays multidimensionales.

Almacenamiento de arrays en memoria.

Arrays como parámetros de subprogramas.

Arrays de “punteros”.

1. INTRODUCCIÓN A LAS ESTRUCTURAS DE DATOS:

Clasificación de los tipos de datos según su estructura:

- Simples:

- Estándar (entero, real, carácter, booleano)

- No estándar (enumeración, subrango)

- Estructurados:

- Estáticos (arrays, cadena, registros, ficheros, conjuntos) Pilas

- Dinámicos (punteros, listas enlazadas, árboles, grafos) Colas

Los tipos simples son cuando cada dato representa un único elemento:

- Estándar: Están definidos por defecto por el lenguaje.

- No estándar: Tipos simples definidos por el usuario.

Los tipos de datos estructurados, son cuándo un dato es una estructura que se construyen a partir de otros complementos.

• Estáticos: Ocupan un tamaño de memoria fijo, que tengo que definir antes de declararlo.

• Dinámicos: La estructura no ocupa un tamaño fijo de memoria, sino que ocupa la memoria que ocupa en cada momento. Se van a manejar a través del tipo de dato puntero.

• Puntero: Es una variable cuyo contenido es una dirección de memoria y esa dirección de memoria corresponde a la dirección de memoria de otra variable, que es la variable apuntada.

Según el tipo de datos de la variable apuntada variará el tipo de puntero. A través de una variable de tipo puntero podemos establecer la conexión o enlace entre los elementos que van a formar la estructura, y según se realizan estos enlaces vamos a tener diferentes tipos de estructuras (listas enlazadas, árboles, grafos).

Las pilas y las colas son 2 estructuras de datos con un funcionamiento especial, que pueden implementarse con memoria estática o dinámica.

2. ARRAYS UNIDIMENSIONALES: VECTORES.

Un array unidimensional, o lineal, o vector, es un conjunto finito y ordenado de elementos homogéneos.

Es finito porque tiene un número determinado de elementos. Homogéneo porque todos los elementos almacenados van a ser del mismo tipo. Ordenado porque vamos a poder acceder a cada elemento del array de manera independiente porque va a haber una forma de referenciar cada elemento. Para referenciar cada elemento de un array vamos a usar índices (valor que directa o indirectamente referencia la posición del array).

Los índices tienen que ser de cualquier tipo de datos escalar (entre los que se puede definir un orden, y que entre 2 elementos consecutivos no puede haber infinitos elementos), aunque normalmente como índices se van a utilizar números enteros.

Para referenciar un elemento de un array usaremos el nombre del array y entre corchetes [ ] el índice que determina la posición de ese elemento en el array.

El rango o longitud de un vector o array lineal es la diferencia entre el índice de valor máximo y el índice de valor mínimo de ese array + 1. Normalmente los índices comienzan a enumerarse, es decir, el valor mínimo del índice es 0 ó 1, dependiendo del lenguaje (en Pascal con 1 y en C con 0). Sin embargo nadie impide que comiencen en cualquier otro valor.

Los arrays se almacenan siempre en posiciones consecutivas de memoria y podemos acceder a cada elemento del array de manera independiente a través de los índices. Un índice no tiene porque ser un valor constante, sino que puede ser también una variable o una expresión que al ser evaluada devuelva ese índice.

A la hora de definir un array siempre habrá que dar el nombre del array, el rango de sus índices y el tipo de los datos que contiene, y para hacer esa declaración, se utiliza la siguiente nomenclatura.

<nom_array>: array [LI .. LS] de <tipo>

sueldo: array [1 .. 8] de real

sueldo: array [1990 .. 1997] de real

sueldo [1992] 100000

I: entero

I 1992

Sueldo [I]

Sueldo [I+2]

3. OPERACIONES CON ARRAYS UNIDIMENSIONALES O VECTORES:

1. Asignación de un dato a una posición concreta del array:

<nom_array>[indice] valor

1

2

3

4

5

6

7

8

9

10

11

12

Ventas [3] 800000

2. Lectura y escritura de datos:

leer <nom_array>[indice]

escribir <nom_array>[indice]

desde i=1 hasta 12

escribir “Introduce las ventas del mes”i

leer ventas [i]

fin desde

desde i=1 hasta 12

escribir “Ventas del mes”i”=”ventas [i]

fin desde

3. Recorrido o acceso secuencial de un array:

- Consiste en pasar por todas las posiciones del array para procesar su información.

Desde i=1 hasta 12

Ventas [i] ventas [i] + 1000000

Fin desde

4. Actualización de un array:

1º) Añadir datos:

Es un caso especial de la operación de insercción de un elemento en un array, pero el elemento lo metemos después de la última posición que contiene información válida en el array.

Para que esto se pueda hacer es necesario que si actualmente el array tiene K posiciones de información válida, tenga un tamaño de al menos K+1 para que pueda añadir otro elemento a continuación de K.

<nom_array>[K+1] valor

2º) Inserción de datos:

Consiste en introducir un elemento en el interior de un array para lo cual será necesario desplazar todos los elementos situados a la derecha del que vamos a insertar una posición a la derecha con el fin de conservar el orden relativo entre ellos.

Para que se pueda insertar un nuevo elemento en el array si ya existen N elementos con información en el array, el array tendrá que tener un tamaño de cómo mínimo N+1 para poder insertar el elemento.

C

E

F

J

M

O

“G”

Siendo K la posición en la que tengo que insertar el nuevo elemento y N el número de elementos válidos en el array en el momento de la inserción y siempre suponiendo de N+1, el algoritmo de inserción será:

Desde i=N hasta K

A[I+1] A[I]

Fin desde

A[K] valor

3º) Borrar datos:

Para eliminar un elemento de un array si ese elemento está posicionado al final del array, no hay ningún problema, simplemente si el tamaño del array era N, ahora hay que considerar que el tamaño del array es N-1.

Si el elemento a borrar ocupa cualquier otra posición entonces tendré que desplazar todos los elementos situados a la derecha del que quiero borrar una posición hacia la izquierda para que el array quede organizado.

C

E

F

J

M

O

Borrar J.

Suponiendo que el número de elementos validos actualmente es N y que quiero borrar el elemento de la posición K.

Desde i=K hasta N-1

A[I] A[I+1]

Fin desde

Para indicar que el número de elementos validos es N, podríamos indicarlo como N N-1.

4. ARRAYS BIDIMENSIONALES O MATRICES:

En un array unidimensional o vector cada elemento se referencia por un índice, en un array bidimensional cada elemento se va a referenciar por 2 índices, y ahora la representación lógica ya no va a ser un vector, sino una matriz.

Un array bidimensional de M*N elementos es un conjunto de M*N elementos, todos del mismo tipo, cada uno de los cuales se referencia a través de 2 subíndices. El primer subíndice podrá variar entre 1 y M si hemos empezado a numerar los índices por 1, y el segundo índice variará entre 1 y N, si hemos empezado a numerar los índices por el 1.

Y más en general podemos definir un array de 2 dimensiones de la siguiente manera.

<nom_array>: array [LI1..LS2,LI2..LS2] de <tipo>

<var_array>[I , J]

LI1 <= I <= LS1

LI2 <= J <= LS2

El tamaño del array será (LS1-LI1 +1)*(LS2-LI2 +1)

Ventas de cada mes de 1990 a 1995:

Ventas: array [1990..1995,1..12] de real

6*12=72

La representación lógica de un array bidimensional es una matriz de dimensiones M*N donde M es el número de filas de la matriz y N es el número de columnas, es decir, la 1ª dimensión indicaría las filas y la 2ª dimensión indicaría las columnas, es decir, al intentar acceder a un elemento I,J estaríamos accediendo al elemento que ocupa la fila I y la columna J.

En memoria, sin embargo todos los elementos del array se almacenan en posiciones contiguas pero nosotros lo vemos como una matriz.

1 2 3 4 5 6 7 8 9 10 11 12

	1990
	1991
	1992
	1993			X
	1994
	1995

Ventas [1993,3]

En memoria estaría almacenado todo seguido:

Manejo de matrices:

- Para poner a 0 todos los elementos de la matriz.

M: array [1..N,1..M] de entero

Var i,j entero

Desde i=1 hasta n

Desde j=1 hasta M

M [i,j] 0

Fin desde

Fin desde

- Para poner a 0 solo los elementos de la fila I:

Desde i=1 hasta N

M [i,j] 0

Fin desde

5. ARRAYS MULTIDIMENSIONALES:

Un array multidimensional es un array de 3 ó más dimensiones. Si tenemos un array de N dimensiones, cada dimensión de tamaño d1,d2,..,dN, el número de elementos del array será d1*d2*..*dN, y para acceder a un elemento concreto del array utilizaremos N índices, cada uno de los cuales referenciará a una posición dentro de una dimensión, siempre según el orden de declaración.

En memoria, el array se sigue almacenando en posiciones consecutivas.

La declaración de un array multidimensional sería:

Nom_array: array [LI1..LS1,LI2..LS2,LI3..LS3,LIN..LSN] de tipo

Nom_array [I1,I2,I3,IN]

LI1 <= I1 <= LS2

LIN <= I2 <= LSN

6. ALMACENAMIENTO DE ARRAYS EN MEMORIA:

Un array en memoria siempre se almacena en posiciones contiguas a partir de la dirección base de comienzo del array que me la dan cuando yo declaro una variable del tipo array.

El tamaño que ocupa el array en memoria es el producto del número de sus elementos por el tamaño de cada uno de ellos.

Array [1..100] de carácter

1 byte * 100 elementos = 100 bytes

En el caso de un array bidimensional, también se seguirá almacenando en posiciones contiguas de memoria, y su tamaño será el producto de sus elementos pro el tamaño.

Ahora, la forma en la que están almacenados esos elementos va a depender de que el array se almacene fila a fila o columna a columna, que también se conoce como almacenamiento por orden de fila mayor o por orden de columna mayor.

C1

C2

.....

Cm

C1

C2

...

Cm

F1 F2 F3

A: array [1..N,1..M] de <tipo>

Fila

1,1

1,2

1,3

.....

1,M

2,1

2,2

2,3

....

2,M

N,1

N,2

...

N,m

Como hallar la dirección base en la que comienza a almacenarse un determinado elemento de un array:

- Unidimensionales:

DIR(A[I])= Dir_Base + (I-1) * Tamaño

Número elemento = 3

Tamaño = 5

Dir_Base = 100

A[3] comienza en la dirección 110

- Bidimensionales:

• Orden de fila mayor

Dir(A[i,j])= Dir_Base + [((I-1)*M)+(J-1)]*Tamaño

• Orden de columna mayor

Dir(A[i,j])= Dir_Base + [((J-1)*N)+(I-1)]*Tamaño

7. ARRAYS COMO PARÁMETROS DE SUBPROGRAMAS:

Un array es también un tipo de datos estructurado, y se puede pasar como parámetro a un subprograma, pero el problema es que no sabemos como indicar si su paso es por valor o por referencia.

En principio, el paso de un array siempre tiene sentido que sea por referencia (que se modifique y tenga repercusión en el exterior), y si es por valor solo serviría para leer información.

La mayor parte de los lenguajes de programación, pasan los arrays por referencia (si se modifica el array se nota en el exterior). Nosotros también lo haremos así.

Si paso el array y no quiero modificarlo, con no modificarlo basta.

Es distinto pasar un array como parámetro a pasar una posición del array, si paso el array entero como parámetro, el parámetro formal asociado será un array con la misma estructura que el parámetro real, pero si lo que quiero pasar es un elemento de una posición concreta del array, el parámetro formal asociado no será del tipo array, sino que será del tipo de datos que contenga el array, porque cada elemento de un array es un elemento independiente que se puede usar por separado.

En el caso de que pasemos un array entero como parámetro, el parámetro formal asociado, tendrá que ser un array de la misma estructura que tiene el mismo tipo de datos y el mismo tamaño.

En C, el parámetro formal asociado tiene que ser del mismo tipo de datos, pero no hace falta que sea del mismo tamaño.

Para pasar un array como parámetro real, utilizare el nombre del array, en cambio si pasamos una posición concreta, usaré el nombre y el índice. En C, el nombre de un array indica su dirección de comienzo en memoria, y por eso siempre se pasa por referencia.

Siempre vamos a pasar los arrays por referencia, sin la palabra clave ent-sal.

Como en las funciones no se pasan los parámetros por referencia, lo mejor es no pasar los arrays como parámetros de las funciones.

Procedimiento <nombre_p> (<nom_par>:array [LI1..LS1] de <tipo>; ...)

Var A: array [LI1..LS1] de <tipo>

Nom_p (array) Sólo se pasa el nombre.

8. ARRAYS DE “PUNTEROS”:

En realidad lo que vamos a explicar con este concepto es la posibilidad de que desde un array se apunte a la posición de otro array. Que unos arrays sirvan para referenciar a otros.

¿Qué es un puntero?:

Un puntero es una variable que contiene una dirección en la que está almacenado un elemento que llamamos apuntado.

Desde este punto de vista, un índice indirectamente también es un puntero porque indirectamente indica una posición del array, pero no lo es directamente porque no almacena una dirección.

Desde este punto de vista, si un array contiene valores de índices, es decir, que cada posición de ese array lo que hace es apuntar a la posición de otro array, entonces decimos que es un array de punteros, aunque en realidad la definición mas correcta es que es un array de índices a otro array.

¿Cuándo es útil usar un array de índice?:

Imaginemos que tenemos una compañía que quiere tener almacenados los datos de sus empleados organizados por zonas. Imaginemos que hay 4 zonas.

Z1	Z2	Z3	Z4
X	W	H	C
A		J	D
Y			K
			L

Podemos almacenar esta información de distintas formas:

• Un array bidimensional 4*N, en donde 4 son las zonas y N es el número máximo de empleados que hay por zona.

El inconveniente es la perdida de espacio.

• Usar un array unidimensional o vector donde estén todos los datos seguidos.

El inconveniente es que no tengo los empleados ordenados por zonas.

• Usar un array unidimensional, y entre cada 2 zonas meter en la posición que va entre ellas una marca especial para indicar que paso de zona.

El inconveniente es que para pasar a una zona tengo que pasar por todas las anteriores.

• Usar un array de índices:

Un array con la información de los empleados.

Otro array de índices que contendrá tantas posiciones como zonas haya.

En cada posición de cada zona almacenaré el índice en donde comienza el primer empleado de esa zona en el array de empleados.

Zonas Empleados

1 X

4 A

5 Y

• W

H J

C

D

K

L

* Listar todos los empleados de la zona 3:

Desde i=zona[3] hasta zona[4]-1

Escribir Empleados [i]

Fin desde

* Número de empleados:

Zona [4] - Zona [3]

EJERCICIOS: TEMA 6

Hay unos multicines con 5 salas, y cada sala con 100 personas distribuidas en 20 asientos y 5 filas.

Si yo pido entrada para una sala, implementar un programa que me diga si hay sitio en la sala.

Algoritmo cines

Const

Salas=5

Asientos=20

Filas=5

Var

N_salas,j,k: entero

Marca: boolean

A: array [1..salas,1..asientos,1..filas] de entero

Inicio

Pedir_datos (n_salas)

Mientras n_salas <> 0

Marca falso

J 0

K 1

Repetir

Si j > asientos

Entonces j 1

K k+1

Fin si

Si (j=asientos) y (k>=filas)

Entonces escribir “Sala llena”

Marca verdadero

Sino si a [n_salas,j,k]=0

Entonces a[n_salas,j,k] 1

Escribir “Asiento”j”fila”k

Marca verdadero

Fin si

Fin si

Hasta (a[n_salas,j,k]=1) y (marca=verdadero)

Pedir_datos (n_salas)

Fin mientras

Fin

Procedimiento pedir_datos (ent-sal s: entero)

Inicio

Repetir

Escribir “¿En qué sala quieres entrar?”

Leer s

Hasta (s>=0) y (s<=salas)

Fin pedir_datos

2. ¿Qué escribe este programa?

Algoritmo Prin

Var

Datos: array [1..10] de entero

i: entero

inicio

desde i=1 hasta 10

datos [i] i

fin desde

P1 (datos,datos[3])

Desde i=1 hasta 10

Escribir datos [i]

Fin desde

Fin

Procedimiento P1 (a: array [1..10] de entero; ent-sal x: entero)

Inicio

X 0

Desde i=1 hasta 10

X x + a[i]

Fin desde

Fin P1

* Solución: 1, 2, 55, 4, 5, 6, 7, 8, 9, 10.

3. Dada una matriz A de M*N elementos, actualizarla tal que la matriz resultante tenga divididos a los elementos de la diagonal principal por la suma de los elementos que no forman parte de ella.

Algoritmo div_matriz

Var

A: array [1..M,1..N] de real

Suma: real

Inicio

Pedir_datos (a)

Sumar (a,suma)

Escribir (a)

Fin

Procedimiento pedir_datos (matriz: array [1..M,1..N] de real)

Var

I,j: entero

Inicio

Desde i=1 hasta M

Desde j=1 hasta N

Escribir “Introduce el elemento”i”,”j

Leer a[i,j]

Fin desde

Fin desde

Fin pedir_datos

Procedimiento sumar (matriz: array [1..M,1..N] de real; ent-sal s: real)

Var

I,j: entero

Inicio

S 0

Desde i=1 hasta M

Desde j=1 hasta N

Si i< > j

Entonces s s + matriz [i,j]

Fin si

Fin desde

Fin desde

Fin sumar

Procedimiento escribir (matriz: array [1..M,1..N] de real; s: real)

Var

I,j: entero

Inicio

Desde i=1 hasta M

Desde j=1 hasta N

Si i=j

Entonces escribir a[i,j]/s

Sino escribir a[i,j]

Fin si

Fin desde

Fin desde

Fin escribir

4. Tengo guardado en una estructura los alumnos de nuestra escuela, sabiendo que hay 3 cursos, M alumnos por curso y N asignaturas por alumno, determinar mediante subprogramas:

Cual es la nota media de un determinado curso.

Cuantos aprobados y suspensos hay en una determinada asignatura.

Cual es el alumno de la escuela con mejor nota media.

Algoritmo escuela

Const

Cursos=3

Alumnos=M

Asignaturas=N

Tipo

Dato=array [1..cursos,1..alumnos,1..asignaturas] de real

Var

Nota: dato

Inicio

Pedir_datos (nota)

Media_curso (nota)

Ap_susp (nota)

Media_alum (curso)

Fin

Procedimiento pedir_datos (n: datos)

Var

I,j,k: entero

Inicio

Desde i=1 hasta cursos

Desde j=1 hasta alumnos

Desde k=1 hasta asignaturas

Repetir

Escribir “Nota del alumno”j”asignatura”k”curso”i

Leer n[i,j,k]

Hasta (n[i,j,k>=0) y (n[i,j,k] <=10)

Fin desde

Fin desde

Fin desde

Fin pedir_datos

Procedimiento media_curso (n: dato)

Var

J,k,resp: entero

Media,suma: entero

Inicio

Suma 0.0

Repetir

Escribir “¿De qué curso quieres hacer la media?”

Leer resp

Hasta (resp<=1) y (resp<=cursos)

Desde j=1 hasta alumnos

Desde k=1 hasta asignaturas

Suma:=suma + n[resp,j,k]

Fin desde

Fin desde

Media suma /alumnos*asignatura

Escribir “La nota media del curso”resp”es”media

Fin media_curso

Procedimiento ap_susp (n:dato)

Var

Susp,ap,i,j: entero

Inicio

Susp 0

Ap 0

Repetir

Escribir “¿Qué asignatura quieres ver?”

Leer asig

Hasta (asig>=1) y (asig<=asignaturas)

Desde i=1 hasta cursos

Desde j=1 hasta alumnos

Si n[i,j,asig] >=5

Entonces ap ap + 1

Sino susp susp + 1

Fin si

Fin desde

Fin desde

Escribir “En la asignatura”asig”hay”ap”aprobados”

Escribir “En la asignatura”asig”hay”susp”suspensos”

Fin ap_susp

Procedimiento media_alum (n: dato)

Var

I,j,alum,curs: entero

Suma,media,mayor: real

Inicio

Mayor 0.0

Desde i=1 hasta cursos

Desde j=1 hasta alumnos

Suma 0.0

Desde k=1 hasta asignaturas

Suma suma + n[i,j,k]

Fin desde

Media suma / asignaturas

Si media > mayor

Entonces mayor media

Curs i

Alum j

Fin si

Fin desde

Fin desde

Escribir “El alumno con mayor media es el”alum”del curso”curs

Escribir “y su nota es de”mayor

Fin media_alum

5. Multiplicar 2 matrices de dimensiones M*N y P*Q.

Algoritmo multiplicar_matrices

Tipo

Matriz1=array [1..M,1..N] de entero

Matriz2=array [1..P,11..Q] de entero

Resultado=array [1..M,1..Q] de entero

Var

Mat1: matriz1

Mat2: matriz2

R: resultado

Inicio

Pedir_datos (mat1,mat2)

Multiplicar (mat1,mat2,r)

Visualizar (r)

Fin

Procedimiento pedir_datos (m1: matriz1; m2: matriz2)

Var

I,j: entero

Inicio

Desde i=1 hasta M

Desde j=1 hasta N

Escribir “Introduce el elemento”i”,”j”de la matriz 1”

Leer m1[i,j]

Fin desde

Fin desde

Desde i=1 hasta P

Desde j=1 hasta Q

Escribir “Introduce el elemento”i”,”de la matriz 2”

Leer m2[i,j]

Fin desde

Fin desde

Fin pedir_datos

Procedimiento multiplicar (m1: matriz1; m2: matriz2; ent-sal resul: resultado)

Var

Fila,i,j,acum: entero

Inicio

Desde fila=1 hasta N

Desde i=1 hasta P

Resul[fila,i] 0

Desde j=1 hasta Q

Resul[fila,i] resul[fila,i]+m1[fila,j]*m2[j,i]

Fin desde

Fin desde

Fin desde

Fin multiplicar

Procedimiento visualizar (resul: resultado)

Var

I,j: entero

Inicio

Desde i=1 hasta M

Desde j=1 hasta Q

Escribir resul[i,j]

Fin desde

Fin desde

Fin visualizar

6. Resolver la siguiente serie:

Algoritmo serie

Tipo

Matriz1= array [1..M,1..N] de entero

Matriz2= array [1..N,1..N] de entero

Var

Suma1,suma2,suma3: entero

X: real

Inicio

Sumas (suma1,suma2,suma3)

Resultado (suma1,suma2,suma3,x)

Escribir “El resultado es”x)

Fin

Procedimiento sumas (s1: entero;s2: entero;s3: entero)

Var

I,j: entero

Inicio

Desde i=1 hasta M

S2 0

Desde j=1 hasta N

S2 s2 + a[i,j]*j

Fin desde

S1 s1 + I*s2

Fin desde

S3 0

Desde j=2 hasta N-1

S3 s3 + b[n,j]

Fin desde

Fin sumas

Procedimiento resultado (s1: entero; s2: entero; s3: entero; ent-sal y: real)

Inicio

Y s1*s2/s3

Fin resultado

7. Una empresa consta de 5 departamentos con 20 empleados cada departamento, si tengo todas las ventas en una estructura, determinar:

• Ventas de un determinado departamento en un determinado mes.

• Ventas de un determinado empleado en un determinado departamento.

• Cual es el departamento con más ventas.

Algoritmo empresa

Const

D=5

E=20

M=12

Tipo

Matriz= array [1..d,1..e,1..m] de real

Var

Ventas: matriz

Cantidad: real

Departamentos: entero

Inicio

Pedir_datos (ventas)

Dep_mes (ventas)

Dep_empleado (ventas)

Mejor_dep (ventas)

Fin

Procedimiento pedir_datos (a: matriz)

Var

I,j,k: entero

Inicio

Desde i=1 hasta D

Desde j=1 hasta E

Desde k=1 hasta M

Escribir “Ventas del departamento”i”empleado”j”mes”k”

Leer a[i,j,k]

Fin desde

Fin desde

Fin desde

Fin pedir_datos

Procedimiento dep_mes (a: matriz)

Var

Dep,j,mes: entero

V: real

Inicio

V 0.0

Repetir

Escribir “Departamento”

Leer dep

Hasta (dep >=1) y (dep <=d)

Repetir

Escribir “Mes”

Leer mes

Hasta (mes >=1) y (mes <=12)

Desde j=1 hasta E

V V + a[dep,j,mes]

Fin desde

Escribir “Las ventas del departamento”dep”en el mes”mes”son”v

Fin dep_mes

Procedimiento dep_empleado (a: matriz)

Var

Dep,empleado,k: entero

V: real

Inicio

V 0.0

Repetir

Escribir “Empleado”

Leer empleado

Hasta (empleado >=1) y (empleado <=E)

Repetir

Escribir “Departamento”

Leer dep

Hasta (dep >=1) y (dep <=d)

Desde k=1 hasta M

V V + a[dep,empleado,k]

Fin desde

Escribir “Las ventas del empleado”empleado”del departamento”dep”son”v

Fin dep_empleado

Procedimiento mejor_dep (a: matriz)

Var

I,j,k,dep: entero

Mayor,v: real

Inicio

Mayor 0.0

Desde i=1 hasta D

V 0

Desde j=1 hasta E

Desde k=1 hasta M

V V + a[i,j,k]

Fin desde

Fin desde

Si v > mayor

Entonces mayor v

Dep i

Fin si

Fin desde

Escribir “El mejor departamento es el”dep”con”mayor

Fin mejor_dep

8. Dado un array A de M*N elementos donde los elementos son números enteros, hallar la dirección de comienzo del elemento 4º del array sabiendo que se almacena a partir de la dirección 1200 y que en nuestra máquina los enteros ocupan 2 bytes.

Dir A(1,4)= 1200 + 3*2 =1206

9. Dado un array de 4 * 5 elementos que contiene caracteres, sabiendo que se almacena a partir de la posición 500, en que posición comienza a almacenarse el elemento A[3,5].

Dir A[3,5] = 500 + (2*5+4)*1 = 514 En orden de fila mayor

Dir A[3,5] = 500 + (4*4+2)*1 = 518 En orden de columna mayor

LAS CADENAS DE CARACTERES

TEMA 7

Juego de caracteres.

Cadena de caracteres.

Datos de tipo carácter.

Operaciones con cadenas.

1. JUEGO DE CARACTERES:

En principio se programaba todo con 0 y 1, pero como esto costaba mucho, apareció la necesidad de crear un lenguaje semejante al humano para entendernos más fácilmente con la computadora, y para ello aparecen los juegos de caracteres.

El juego de caracteres es una especie de alfabeto que usa la máquina.

Hay 2 juegos de caracteres principales:

• ASCII: El que más se usa.

• EBCDIC: Creado por IBM.

Hay 2 tipos de ASCII, el básico y el extendido.

En el ASCII básico, cada carácter se codifica con 7 bits, por lo que existen 2^7=128 caracteres.

En el ASCII extendido, cada carácter ocupa 8 bits (1 byte) por lo que existirán 2^8= 256 caracteres, numerados del 0 al 255.

En el EBCDIC, cada carácter ocupa también 8 bits.

En cualquiera de los 2 juegos, existen 4 tipos de caracteres:

• Alfabéticos: Letras mayúsculas y minúsculas.

• Numéricos: Números.

• Especiales: Todos los que no son letras y números, que vienen en el teclado.

• Control: No son imprimibles y tienen asignados caracteres especiales. Sirven para de terminar el fin de línea, fin de texto. Van del 128 al 255.

Un juego de caracteres es una tabla que a cada número tiene asociado un número.

2. CADENA DE CARACTERES:

Es un conjunto de 0 ó más caracteres. Entre estos caracteres puede estar incluido el blanco.

En pseudocódigo, el blanco es el b. Las cadenas de caracteres se delimitan con dobles comillas “ “, pero en algunos lenguajes se delimitan con ` `.

Las cadenas de caracteres se almacenan en posiciones contiguas de memoria.

La longitud de una cadena es el número de caracteres de la misma. Si hubiese algún carácter que se utilizara como especial para señalar el fin de cadena, no se consideraría en la longitud.

Si una cadena tiene longitud 0, la llamamos cadena nula por lo que no tiene ningún carácter, pero esto no quiere decir que no tenga ningún carácter válido, por que puede haber algún carácter especial no imprimible que forme parte de la cadena.

Una subcadena es una cadena extraída de otra.

3. DATOS DE TIPO CARÁCTER:

Constantes: Una constante de tipo cadena es un conjunto de 0 o más caracteres encerrados entre “ “.

Si dentro de la cadena quiero poner como parte de la cadena las “, las pongo 2 veces. Esto depende del lenguaje.

“Hola””Adios” Hola”Adios

En algunos lenguajes hay un carácter de escape. En C, el carácter de escape es la \.

Una constante de tipo carácter es un solo carácter encerrado entre comillas simples.

Variables: Hay que distinguir entre una variable de tipo carácter y una variable de tipo cadena, el contenido de una variable de tipo cadena es un conjunto de 0 ó más caracteres encerrados entre “ “, mientras que una variable de tipo carácter es un solo carácter encerrado entre ` `.

Formas de almacenamiento de cadenas en memoria:

Almacenamiento estático:

La longitud de la cadena se tiene que definir antes de ser usada y siempre va a tener esa longitud, almacenándose en posiciones contiguas de memoria.

Si la cadena no ocupa todo el espacio, el resto se rellena con blancos, y esos blancos se consideran parte de la cadena.

Esto es muy deficiente y no se usa casi en ningún lenguaje.

Almacenamiento semiestático:

Antes de usar la cadena, hay que declarar la longitud máxima que puede tener y ese es el espacio que se reserva en memoria para almacenar la cadena, siempre en posiciones contiguas.

La longitud real de la cadena durante la ejecución puede variar aunque siempre tiene que ser menor que el máximo de la cadena.

Puesto que la cadena no tiene porque ocupar la longitud máxima, para determinar que parte ocupa realmente esa cadena, se pueden utilizar diferentes métodos.

Pascal lo que hace es reservar los 2 primeros bytes de la zona de memoria en que guardamos la cadena para indicar el primero la longitud máxima que puede tener la cadena y el segundo la longitud actual.

10

4

H

O

L

A

1 2 3 4 5 6 7 8 9 10

Otros lenguajes como C, utilizan un carácter especial que indica el fin de cadena tal que los caracteres que utilizan parte de la cadena son todos los almacenados hasta encontrar ese carácter especial.

H

O

L

A

\O

0 1 2 3 4 5 6 7 8 9

La diferencia entre almacenar un solo carácter en un tipo carácter o en un tipo cadena, sería la siguiente:

C `a'

C “a”

Almacenamiento dinámico:

No hay que definir la longitud de la cadena antes de usarla, ni siquiera la máxima. Para esto, se utiliza la memoria dinámica, y para establecer el número de elementos de la cadena usaremos listas enlazadas en las que cada nodo de la lista contara un carácter de la cadena y se enlazaría mediante punteros.

La información no tiene que estar almacenada en posiciones contiguas de memoria.

H O L A

4. OPERACIONES CON CADENAS:

Al igual que con cualquier tipo de datos, podemos hacer operaciones de entrada y salida (leer y escribir).

Var cad: cadena

Leer (cad)

Escribir (cad)

Aparte de estas instrucciones, la mayor parte de los lenguajes permiten realizar operaciones especiales con las variables de tipo cadena.

La mayor parte de los lenguajes tienen operaciones de tratamiento de cadenas, y esas operaciones vienen en librerías externas.

Las operaciones más usadas son:

Longitud de una cadena:

Es una función a la que se le pasa una cadena como parámetro y como resultado devuelve su longitud.

Funcion longitud (c:cadena): entero

Comparación de cadenas:

Las cadenas se pueden comparar entre si usando los símbolos de comparación. Esto se puede realizar porque lo que voy a comparar son los valores ASCII asociados a cada carácter.

En el caso de que se comparen 2 cadenas de diferente longitud tal que la cadena de menor longitud tiene N caracteres y estos N caracteres coinciden con los N primeros caracteres de la cadena más larga, se considera mayor la cadena más larga.

PEPE > PAPA

PEPES > PEPE

En la mayor parte de los lenguajes, hay una función que hace la comparación.

En C es la función strcmp (C1,C2).

Funcion comparacion (C1:cadena;C2:cadena): entero

Esta función devuelve:

• 0 si C1=C2

• Un positivo si C1 > C2

• Un negativo si C1 < C2

Concatenación:

Lo que permite es unir varias cadenas en una sola, manteniendo el orden de los caracteres que se unen.

En pseudocódigo se usa el símbolo &: C1&C2

C1=”Hola”

C2=”Adios”

C3=C1&C2=”HolaAdios”

Procedimiento concatenacion (ent-sal C1:cadena;C2:cadena)

• Se devuelve en C1 la concatenación C1&C2.

Subcadenas:

Extrae parte de una cadena.

Se pueden usar 3 procedimientos:

Procedimiento subcadena (c:cadena;inicio:entero;longitud:entero;ent-sal s:cadena)

• Si inicio es negativo, o es mayor que longitud, se devuelve la cadena nula.

• Si inicio+longitud es mayor que el tamaño de la cadena, devuelvo desde inicio hasta de fin de la cadena.

Procedimiento subcadena (c:cadena;inicio:entero;fin:entero;ent-sal s:cadena)

• Si fin es menor que inicio, devuelve la cadena nula.

• Si fin es mayor que la longitud de la cadena, se devuelve desde inicio hasta el fin de la cadena.

Procedimiento subcadena (c:cadena;inicio:entero;ent-sal s:cadena)

• S va desde el inicio hasta el final de la cadena.

Inserción:

Consiste en meter una cadena dentro de otra a partir de una determinada posición.

Procedimiento insertar (ent-sal C1:cadena;C2:cadena;inicio:entero)

C1=”Pepe”

C2=”Nuria”

Insertar (C1,C2,3)= PeNuriape

• Si inicio es mayor que la longitud de C1 o inicio es menor que 0, no se inserta nada.

Borrado:

Consiste en borrar de una cadena una subcadena que forma parte de ella. Hay que dar la posición de inicio y final de la subcadena que quiero borrar.

Procedimiento borrar (ent-sal C1:cadena;inicio:entero;fin:entero)

• Si fin es menor que inicio, o inicio es mayor que la longitud de la cadena, no se borra nada.

Procedimiento borrar (ent-sal C1:cadena;inicio:entero;fin:entero)

C1=”Casa azul”

Borrar (C1,3,5)

C1=”Caazul”

Intercambio:

Consiste en substituir la aparición de una subcadena dentro de una cadena, por otra subcadena. Para eso la primera subcadena tiene que aparecer en la otra.

Procedimiento intercambio (ent-sal C1:cadena;S1:cadena;S2:cadena)

C1=”Casa azul”

S1=”asa”

S2=”asita”

C1=”Casita azul”

Si S1 no está en C1, no se cambia nada.

Conversión de cadenas a números:

Es una función que se le pasa una cadena caracteres numéricos y devuelve el número asociado.

Funcion valor (c:cadena): entero

I=”234”

Var i: entero

I= valor (C1) devuelve 234.

Conversión de números a cadenas:

Es un procedimiento al que se le pasa un número y lo convierte a una cadena.

Procedimiento conv_cad (n:entero;ent-sal c:cadena)

I=234

Conv_cad (i,C1) devuelve “234”

Función que devuelve el carácter ASCII de un número:

Funcion conv_car (n:entero): carácter

Función que devuelve el número asociado de un carácter ASCII:

Funcion ASCII (c:carácter): entero

Las cadenas van a estar almacenadas en arrays de caracteres donde el carácter de fin de cadena es el $.

EJERCICIOS: TEMA 7

• Los ejercicios de este tema van a consistir en implementar funciones y procedimientos relacionados con el manejo de las subcadenas.

Funcion numero (c:carácter):entero

Inicio

Según sea C

`0': retorno 0

`1': retorno 1

`2': retorno 2

`3': retorno 3

`4': retorno 4

`5': retorno 5

`6': retorno 6

`7': retorno 7

`8': retorno 8

`9': retorno 9

fin según sea

fin numero

Funcion caract (n: entero):carácter

Inicio

Según sea C

0: retorno `0'

1: retorno `1'

2: retorno `2'

3: retorno `3'

4: retorno `4'

5: retorno `5'

6: retorno `6'

7: retorno `7'

8: retorno `8'

9: retorno `9'

fin según sea

fin caract

Funcion longitud (c:cadena): entero

var

l: entero

Inicio

L 0

Mientras c[L+1] < > `$'

L L+1

Fin mientras

Retorno L

Fin longitud

Funcion Valor (c:cadena): entero

Var

Cif,num,i: entero

Inicio

Cif longitud (c)

Si cif > 0

Entonces num 0

Desde i=1 hasta Cif

Num num+numero (c[i]*10^(cif-i)

Fin desde

Retorno (num)

Sino retorno (-1)

Fin si

Fin valor

Procedimiento conv_cad (n: entero; ent-sal c: cadena)

Var

Cif,aux: entero

Inicio

Cif 1

Aux N

Mientras (aux >10)

Aux aux div 10

Cif cif + 1

Fin mientras

Desde i=cif hasta 1

C[i] caract(n mod 10)

N n div 10

Fin desde

C[cif+1] `$'

Fin conv_cad

Procedimiento borrar (ent-sal c:cadena;inicio:entero;fin:entero)

Var

I,f: entero

Inicio

Si (inicio >0) y (inicio <= fin) y (inicio <= longitud(c))

Entonces i inicio

F fin +1

Mientras (i <=fin) y (c[f] < > `$')

C[i] c[f]

I i+1

F f+1

Fin mientras

C[i] `$'

Fin si

Fin borrado

Procedimiento subcadena (c1:cadena;inicio:entero;longitud:entero;ent-sal c2: cadena)

Var

I,k: entero

Inicio

Si (inicio <=0) o (inicio > longitud (c1))

Entonces c2[1] `$'

Sino i inicio

K 1

Mientras (i <=inicio + longitud) y (c1[i] < > `$')

C2[k] c1[i]

K k+1

I i+1

Fin mientras

C2[k] `$'

Fin si

Fin subcadena

Funcion comparacion (c1:cadena;c2:cadena):entero

Var

I: entero

Inicio

I 1

Mientras (c1[i]=c2[i]) y (c1[i]< > `$') y (c2[i] < > `$')

I I+1

Fin mientras

Si c1[i]=c2[i]

Entonces retorno (0)

Sino retorno(ascii (c1[i])- ascii (c2[i]))

Fin si

Fin comparacion

Funcion busqueda (c: cadena;s1: cadena): entero

Var

I,pos,k: entero

Encontrado: booleano

Inicio

I 1

Encontrado falso

Mientras (c[i] < >'$') y (encontrado=falso)

Si c[i] = s[i]

Entonces pos i

K 1

Mientras (c[i]=s[k]) y (c[i] <>'$') y (s[k]< >'$'

I I+1

K k+1

Fin mientras

Si s[k]='$'

Entonces encontrado verdadero

Sino I pos +1

Pos 0

Fin si

Sino I I+1

Fin si

Fin mientras

Retorno (pos)

Fin busqueda

Procedimiento borrar (ent-sal c:cadena;ini:entero;fin:entero)

Var

I,j: entero

Inicio

I ini

F fin + 1

Mientras c[f] <>'$'

C[i] c[f]

I i + 1

Fin mientras

C [i] `$'

Fin borrar

Procedure insertar (ent-sal c:cadena;s:cadena;pos:entero)

Var

P,j,i: entero

Inicio

P pos

J 1

Mientras s[j]<>'$'

Desde i longitud (c) +1 hasta P

C[i+1] c[i]

Fin desde

C[p] s[j]

J j+1

P p+1

Fin mientras

Fin insertar

Procedimiento intercambio (ent-sal c:cadena;c2:cadena;c3:cadena)

Var

I,pos: entero

Inicio

I 1

Mientras c1[i] <>'$'

Si c1[i]=c2[i]

Entonces pos buscar(c1,c2)

Si pos <> 0

Entonces borrar (c1,pos,pos+longitud(c2)-1)

Insertar (c1,c3,pos)

I pos + longitud(c3)

Sino I i +1

Fin si

Sino I I+1

Fin si

Fin mientras

Fin intercambio

FICHEROS O ARCHIVOS:

TEMA 8

El tipo registro de datos.

Noción de archivo.

Terminología de archivos.

Tipos de soporte.

Tipos de organizaciones de ficheros.

Operaciones sobre ficheros.

Tratamiento de ficheros secuenciales.

Ficheros de texto.

1. EL TIPO REGISTRO DE DATOS:

El tipo registro de datos es un tipo estructurado de datos. Un tipo registro va a estar formado por datos que pueden ser de diferentes tipos.

A cada uno de esos datos lo denominamos campos, y el tipo de estos campos pueden ser uno estandar o uno definido por el usuario, que puede ser cualquier cosa.

La sintaxis que usaremos para definir un tipo registro es la siguiente:

Tipo <nom_tipo_registro> = registro

<campo1>: <tipo>

<campo2>: <tipo>

<campo3>: <tipo>

fin registro

Una vez definida una estructura de tipo registro, ya puede pasar a declarar variables de ese tipo.

Var

<nom_var>: <nom_tipo_registro>

tipo alumno = registro

DNI: array [1..8] de caracteres

Nombre: array [1..100] de caracteres

Nota: real

Fin registro

Var

A1,A2: alumno

Para declarar una variable de un tipo registro, basta con poner:

Var

<nom_var> : <nom_tipo_reg>

Para acceder a un campo concreto de una variable de tipo registro, utilizamos el operador punto.

<nom_var>.<nom_campo>

c.nombre Pepe

Y con ese valor puedo trabajar igual que trabajaría con cualquier valor del mismo tipo que ese campo.

Tipo cliente = registro

DNI: array [1..8] de caracteres

Nombre: Cadena

Saldo: Real

Fin registro

Var

C: cliente

Borrar (c.nombre,3,5)

C.saldo 5+3*8000

Almacenamiento de registros en memoria:

El tamaño que ocupa una variable de tipo registro en memoria es el que resulta de la suma del tamaño de cada uno de sus campos, y esa información también estará almacenada de manera contigua y según el orden en que hayamos declarado los campos.

2. NOCIÓN DE ARCHIVO:

Las estructuras anteriores se almacenaban en memoria principal, y el problema es que la información se pierde al apagar el ordenador. La ventaja es que los accesos son más rápidos. Para resolver esto están los dispositivos de almacenamiento secundario.

Fichero: Es un conjunto de datos estructurados en una colección de unidades elementales denominadas registros, que son de igual tipo y que a su vez están formados por otras unidades de nivel más bajo denominados campos. Todos son del mismo tipo.

3. TERMINOLOGÍA CON FICHEROS:

• Campo: Es una unidad elemental de información que representa un atributo de una entidad. Se define con un nombre, un tamaño y un tipo de datos.

• Registro lógico: Es un conjunto de campos relacionados lógicamente que pueden ser tratados como unidad en el programa.

Desde el punto de vista de programación simplemente es una estructura de tipo registro.

• Archivo o fichero: Es un conjunto de registros del mismo tipo y organizados de tal forma que esos datos pueden ser accedidos para añadir, borrar o actualizar.

• Clave de un fichero: Es un campo o conjunto de campos que sirve para identificar un registro y distinguirla del resto del fichero.

• Registro físico o bloque: Es la cantidad de datos que se transfieren en una operación de E/S entre el dispositivo externo y la memoria.

Desde este punto de vista, un registro físico puede estar compuesto por 0,1,2,... registros lógicos. El número de registros lógicos que hay por cada registro físico, es decir, que se transfiere en una operación de E/S, es lo que se denomina factor de bloqueo.

Ese factor de bloqueo puede ser <1,=1,>1:

• Si es <1, quiere decir que el registro lógico ocupa más que el físico, se transfiere menos de un registro lógico en cada operación de E/S.

• Si es =1, significa que el tamaño del registro lógico y el físico es el mismo, y se transfiere un registro lógico en cada operación de E/S.

• Si es >1, lo más normal, en cada operación de E/S se transfiere más de un registro lógico.

¿Cómo nos interesa que sea el factor de bloqueo?:

Desde un punto de vista, cuanto mayor sea el factor de bloqueo más registros lógicos se transferirán, menos operaciones habrá que hacer y se tardará menos en procesar el fichero. Según esto cuanto mayor sea mejor.

Por otra parte, cada vez que se transfiere información de E/S, se deja en una zona de memoria especial llamada buffer. Cuanto mayor sea el tamaño de bloqueo, mayor será el buffer y menos memoria me quedará para el resto de la información.

Al final hay que lograr un equilibrio para determinar el tamaño idóneo.

• Bases de datos: Es un conjunto de datos relacionados almacenados internamente en un conjunto de ficheros.

4. TIPOS DE SOPORTE:

Los soportes de almacenamiento secundario son en los que almaceno la información, y pueden ser de 2 tipos:

• Secuenciales: Para acceder a un registro o dato concreto dentro de él, tengo que pasar previamente por todos los registros anteriores a él. El ejemplo es una cinta magnética.

• Direccionables: Es posible acceder directamente a una dirección concreta de soporte. El ejemplo es un disco.

5. TIPOS DE ORGANIZACIONES DE FICHEROS:

Organización de archivos:

Viene determinada por 2 características:

• Método de organización: Técnica que utilizo para colocar la información de los registros dentro del dispositivo.

• Método de acceso: Conjunto de programas que me permiten acceder a la información que previamente he almacenado y van a depender mucho del método de organización:

• Acceso directo: Para acceder a un acceso concreto no hay que pasar por los anteriores. El soporte tiene que ser direccionable.

• Acceso secuencial: Para acceder a un registro hay que pasar por todos los anteriores, y esto es posible si el soporte es secuencial, aunque también puedo hacerlo en uno direccionable.

Métodos de organización:

Hay 3 tipos de organización:

• Secuencial

• Directa

• Secuencial indexada

- Secuencial: Los registros se van grabando en un dispositivo unos detrás de otros consecutivamente, sin dejar huecos y según el orden en que son grabados o guardados. Al final para determinar el fin de fichero se usa la marca EOF (End Of File).

- Directa: Se puede acceder a un registro directamente. Para ello son necesarias 2 cosas:

1º) Que cada registro tenga asociada una clave que lo identifique.

2º) Tiene que existir una función especial llamada función de direccionamiento que sea capaz de convetir la clave a una dirección física real en el dispositivo, que es a la que accederemos para localizar la información buscada.

En la práctica en realidad hay un paso intermedio entre la clave y la dirección física que es la dirección relativa a registro.

Suponiendo un fichero de n registros lógicos numerados de 0 a n-1, este valor asociado al registro es lo que sería su dirección relativa a registro, es decir, que lo que tiene que existir es una función que convierta la clave a dirección relativa a registro, y luego una función que convierta la dirección relativa a registro a dirección física, donde la dirección física tendrá Volumen, Cilindro, Pista y Registro, y esta función puede ser por ejemplo el procedimiento de divisiones sucesivas.

Para realizar este procedimiento, primero hay que decir el número de volúmenes, el número de cilindros, el número de pistas y el número de registros que hay.

Después hay que realizar sucesivas divisiones:

DRR nº registros

R1 C1 nº pistas

Registros

R2 C2 nº cilindros

Pistas

R3 C3

Cilindros Volumen

Volumen : C3

Cilindro: R3

Pista: R2 Empezando a contar desde 0.

Registros: R1

Tenemos un dispositivo con 5 volúmenes, 3 cilindros por volumen, 4 pistas por cilindro y 20 registros por pista. ¿Dónde está el registro 1001?

1001 20

1 50 4

2 12 3

0 4

Solución 4021 ó 4022, según empecemos a numerar por 0 o por 1.

El problema está en como convertir la clave de un registro a dirección relativa a registro, si en un soporte como máximo podemos almacenar n registros la dirección relativa a registro irá de 0 a n-1 luego habrá que convertir la clave a uno de estos valores. En cualquier caso suele ocurrir que el rango de claves (conjunto de todas las claves posibles que se pueden dar) es menor que n, ya que en la práctica el espacio reservado es menor que el rango de n porque no usamos todo el espacio.

Según esto puede ocurrir que a diferentes claves les correspondan la misma dirección relativa a registro y por tanto la misma dirección física para almacenarse. A estos registros se les denomina sinónimos, y cuando esto ocurre habrá que almacenar a los registros que tienen la misma posición en un lugar aparte reservado para guardar los sinónimos.

El área reservada se puede colocar en varios sitios dentro de un dispositivo.

Por ejemplo si el rango de claves va de 0 a 999, y la clave es 11919943 una forma de almacenarla, sería cogiendo los 3 últimos números 943.

En cualquier caso la función que convierta una clave a dirección relativa a registro será tal que produzca el menor número de colisiones de sinónimos posibles.

- Secuencial indexada: En esta organización también se puede acceder a un registro directamente, pero ahora lo haré mediante investigación jerárquica de índices.

Para que se pueda aplicar esta organización, obligatoriamente los registros tienen que tener asociados una clave.

En un archivo con esta organización se distinguen 3 áreas:

• Area de datos

• Area de índices

• Area de excedentes

Cuando se crea el fichero la información se va guardando en el área de datos y al mismo tiempo se van creando índices en el área de índices para poder luego localizar esos datos. Después de la creación del fichero la información se almacena en el área de excedentes y se va actualizando también el área de índices.

Tipos de índices:

• Indice de pista: Es el de más bajo nivel y es obligatorio. Hay un índice de pista por cada pista del cilindro, y este índice contiene 2 entradas o valores. El primero determina cual es el valor de la clave más alta almacenada en esa pista, y el segundo determina cual es la clave del primer registro de excedente de esa pista.

• Indice de cilindro: Es el de siguiente nivel y también es obligatorio. Tiene una entrada por cada cilindro y en esa entrada contendrá la clave más alta de los registros almacenados en ese cilindro.

• Indice maestro: No es obligatorio. Solo se usa cuando el índice de cilindro ocupa más de 4 pistas. Tiene una entrada por cada pista del índice de cilindros y contendrá la clave más alta de los registros a los que referencian todos los cilindros de esa pista.

Ej: 2 pistas / cilindro y 2 registros / pista

Pista 1 Pista 2

Area de índices 12 35 60

8 12 15 20 35 42 60

Area de datos 2 8 10 12 14 20 30 35 38 42 50 60

C1 C2 C3

Area de excedentes 15 17 16

Para buscar el registro 30, hay que ir mirando si 30 es <= que el registro con el que lo comparamos.

Si llega el 15, lo metemos en el área de excedentes porque no cabe.

6. OPERACIONES CON FICHEROS:

1. Creación o carga de un fichero:

Consiste en meter los datos por primera vez en un fichero que no existe. Para ello hay que determinar el espacio que hay que reservar para el fichero y el método de acceso.

2. Reorganización de un fichero:

Consiste en crear un fichero nuevo a partir de uno que ya existe. Conviene reorganizarlo cuando ya resulta ineficiente su uso porque hay demasiadas colisiones de sinónimos o muchos registros que ya no existen.

3. Clasificación de un fichero:

Consiste en ordenar los registros por uno o varios campos. En los sistemas grandes, el propio sistema operativo ya soporta operaciones que realizan la organización (SORT).

4. Destrucción de un fichero:

Destrucción de un fichero: Significa eliminar toda la información que contiene el fichero.

5. Reunión o fusión de un fichero:

Crear un fichero a partir de varios.

6. Rotura o estallido de un fichero:

• A partir de un fichero crear varios.

7. Gestión de un fichero:

Para trabajar con un fichero lo primero que tengo que hacer es crearlo. Para crear un fichero tengo que dar un nombre que es con el que le va a guardar en el dispositivo. Pero para manejar ese fichero dentro de un programa tendré que asignarle una variable de tipo de fichero que luego tendré que asociar con el nombre físico del fichero para poder trabajar con él.

A parte de esto, también puedo dar el tamaño del fichero, su organización y el tamaño de su bloque o registro físico, aunque estos 3 últimos parámetros, solo será necesario darlos para sistemas grandes.

Antes de crear el fichero tengo que definir la estructura de su registro para luego al definir la variable que va a referenciar el fichero determinar que fichero va a contener ese tipo de registro.

Un fichero se crea cuando realizamos la operación de apertura del mismo, aunque hay lenguajes en los que hay que especificar 2 cosas (creación y apertura), y en otros si al abrirlo existe se crea.

Al crear un fichero si ya existe, va a depender del lenguaje, en unos da error y en otros se machaca lo que ya existe.

En la operación de apertura si ya existe de fichero, depende de la forma de apertura que ese fichero que ya existía sea machacado o permanezca. De cualquier forma en la operación de abrir tenemos que indicar la variable de tipo fichero que nos va a servir para trabajar con ese fichero en el programa, a continuación y entre “ “ el nombre real de ese fichero en el dispositivo, y finalmente el modo de apertura del fichero.

Abrir (<nom_fich>,”nom_real”,<modo_apert>)

Los modos de apertura, dependen del lenguaje de programación y del modo de organización. Se distinguen 3 modos de apertura:

• Modo de entrada o lectura.

• Modo de salida o escritura.

• Modo de entrada/salida o lectura/escritura.

APPEND: Existe en algunos lenguajes.

Para declarar una variable de tipo fichero, hay que usar una variable de tipo fichero que es: Fichero de <tipo_reg>.

Tipo alumno: registro

Cod_alum: entero

Direccion: cadena[30]

Nota: real

Fin registro

Var f: fichero de alumno

Abrir (F,”c:\estudiantes.dat”,<modo>)

• Modo de entrada: Ese fichero lo voy a usar para leer información de él pero no lo voy a modificar. Para que un fichero se abra en este modo previamente tiene que existir y si no es así, nos dará un error.

• Modo de escritura: Utilizo un fichero para escribir información en él. Al abrirlo no hace falta que exista, si ya existiese, depende del lenguaje, pero normalmente se machaca lo que hay (lo que vamos a hacer).

• Modo de entrada/salida: Voy a hacer operaciones de consulta y actualización de la información.

• Modo APPEND: En pseudocódigo no lo vamos a usar. Append significa añadir, y se utiliza para escribir en un fichero pero añadiendo la información al final del mismo.

En algunos lenguajes también existe la operación RESET, que lo que me hace es posicionarme al principio del fichero.

Reset (<var_fich>)

En todo momento, existirá un puntero que me indica en que posición del fichero estoy situado. Al abrir un fichero normalmente sea cual sea el modo de apertura me voy a quedar situado al comienzo del fichero, salvo que use el modo de apertura Append, qu me posicionaría al final del fichero. A medida que voy haciendo operaciones en el fichero, este valor se va actualizando.

Cerrar un fichero: Quiere decir deshacer la conexión entre la variable del programa que estoy usando para manejar el fichero y el fichero real que está en el dispositivo.

Cerrar (<var_fich>)

Siempre que se acabe de trabajar con un fichero o que queramos cambiar el modo de trabajar con ese fichero, primero lo cerraremos y si queremos volver a trabajar con él, lo volvemos a abrir.

NUNCA HAY QUE DEJAR UN FICHERO ABIERTO.

En algunos lenguajes existe la operación borrar un fichero y lo que hace es eliminar físicamente el fichero.

Aparte de todo esto también existen otras relacionadas con su actualización, que son las altas, las bajas y las modificaciones.

Las consultas son una operación de mantenimiento del fichero.

Alta:

Consiste en añadir un registro al fichero. Si en el fichero los registros tienen algún campo clave, lo primero que hay que comprobar al dar una alta es que no exista ya otro registro con la misma clave.

Baja:

Consiste en eliminar un registro del fichero. La baja puede ser física o lógica.

• Física: Cuando elimino físicamente el registro del fichero.

• Lógica: Cuando al registro lo marcó de una manera especial para indicar que ya no es válido pero no lo elimino físicamente. A rasgos del tratamiento de la información es como si ya no existiera.

En ficheros secuenciales no se permite la modificación de la información tal que para dar de baja a un registro de un fichero, lo que hay que hacer es crear otro fichero con todos los registros menos el que queremos eliminar.

En el resto de las organizaciones normalmente se da la baja lógica (con una marca) y cuando tengo muchos registros marcados como baja lógica reorganizo el fichero (baja física).

Si los registros contienen clave para dar de baja a un registro tendré que dar su clave mirar lo primero si existe y solo en ese caso lo podré borrar.

Reglas importantisimas:

• Para dar la alta a un registro con clave, primero hay que ver si no hay ningún registro con esa clave.

• Para dar la baja a un registro:

Hay que buscar si el registro existe.

Mostrar la información por pantalla y pedir la confirmación del usuario.

Modificación:

Modificar un registro consiste en cambiar la información que contiene, es decir, cambiar el valor de uno o más de sus campos.

En el caso de la organización secuencial como no se pueden modificar directamente, lo que hay que hacer es a partir de la información que ya existe crear otro fichero con todos los registros menos el que quiero modificar, que lo grabaré con la información que quiera.

Algunos lenguajes que soportan la organización secuencial sí permiten hacer la modificación del registro en el mismo fichero (como el C).

Cuando se modifican registros de un fichero con campos clave en el registro, hay que tener en cuenta que lo que jamas se puede modificar es el valor del campo clave, porque hacer eso es como hacer un alta.

Consultas:

Las consultas lo único que hace es leer información del fichero y mostrarme la información.

Para hacer una consulta hay que dar 2 cosas:

• Criterio con el que consulto: Contendrá el campo o campos por los que quiero consultar y el valor que tienen que tener esos campos.

• Información que quiero mostrar: A la hora de mostrar la información, decir que campos quiero mostrar.

7. TRATAMIENTO DE FICHEROS SECUENCIALES:

Operaciones básicas:

Definir la estructura del fichero.

Apertura del fichero.

Tratamiento de los registros.

• Escribir (<var_fich>,<var_reg>)

• Leer (<var_fich>,<var_reg>)

Los ficheros secuenciales no se pueden modificar en una posición concreta, por esa razón cada vez que se quiere dar un alta, baja o modificación de un registro, como no se puede hacer directamente, tendré que usar un fichero auxiliar tal que si es un alta, en el nuevo fichero tendré toda la información del fichero antiguo más el nuevo registro, si es dar de baja, copio en el nuevo fichero todo lo que había en el anterior fichero menos el registro que quiero borrar, y si quiero modificar un registro, copio toda la información y al llegar al registro a modificar, lo copio ya modificado.

Consultas:

Todo tratamiento de ficheros, lo voy a hacer en un bucle, y el final de fichero lo señala la marca EOF.

La primera lectura la voy a hacer fuera del bucle, y las siguientes al final del bucle, y el bucle terminará cuando se lee la marca EOF.

Normalmente, en cualquier lenguaje existe ya implementada una función que dice sí hemos llegado al final del fichero pero que lo que hace es buscar la marca EOF.

Abrir (<var_fich>,”nom”,entrada/Salida)

Leer (<var_fich>,<var_reg>)

Mientras no eof (<var_fich>)

<proceso con registro>

leer (<var_fich>,<var_reg>)

Fin mientras

En Pascal la marca de fin de fichero está físicamente en el fichero, mientras que en C, se compara el tamaño del fichero con la del puntero del fichero, y si coinciden quiere decir que es el fin del fichero.

Problemas que podemos encontrar:

Si el fichero está clasificado por 2 campos y voy a hacer un tratamiento de él, normalmente tendré que hacer 2 bucles anidados y aprovechar que estén clasificados por campos.

Si el fichero está clasificado por un campo, para buscar los ficheros por ese campo, hacemos un solo bucle aprovechando que están clasificados por ese campo.

Si enfrento 2 ficheros, si uno está clasificado y otro no, leeré en el bucle más externo el que no está clasificado, y en el más interno el que está clasificado, aprovechando que estén ordenados.

Si ninguno está clasificado, da igual el orden de los bucles, porque en los 2 tendré que buscar hasta el final.

Si lo que me piden es sacar información a través de un campo que no es el campo de clasificación pero que se sabe el número de valores concretos que puede tomar ese campo, utilizaremos una estructura del tipo array.

Tenemos un fichero con datos de alumnos clasificados por curso y número de alumno, teniendo en cuenta que los alumnos se empiezan a numerar por 1.

La información por alumno es curso, número, nombre y nota. Determinar cuantos alumnos aprobados hay en cada curso.

Tipo alumno : registro

Curso: entero

Num_al: entero

Nom: cadena

Nota: real

Fin registro

Algoritmo clase

Var

F_al: fichero de alumno

R_al: alumno

Aprob: entero

Cur: entero

Inicio

Abrir (f_al,”alumnos.dat”,entrada)

Leer (f_al,r_al)

Mientras no eof (f_al)

Aprob 0

Cur r_al.curso

Mientras cur = r_al.curso

Si (r_al.nota >= 5) y (no eof(f_al))

Entonces aprob aprob + 1

Fin si

Leer (f_al,r_al)

Fin mientras

Escribir “En el curso”cur”han aprobado”aprob

Fin mientras

Cerrar (f_al)

Fin

Tenemos un fichero de empleados clasificado por el número de empleado y un fichero de bajas no clasificado que contiene los números de los empleados que se han dado de baja. Obtener un tercer fichero que contenga a los empleados que realmente hay en la empresa.

Tipo empleado: registro

Num_emp: entero

Nombre: cadena

Sueldo: real

Fin registro

Algoritmo baja

Var

F_e_ini,f_e_fin: fichero de empleado

F_baja: fichero de entero

R_e_ini,r_e_fin: empleado

R_b: entero

Inicio

Abrir (f_e_ini,”Empleado1.dat”,entrada)

Abrir (f_e_fin,”Empleado2.dat”,salida)

Leer (f_e_ini,r_e_ini)

Mientras no eof (f_e_ini)

Abrir (f_b,”Bajas.dat”,entrada)

Leer (f_b,r_b)

Mientras r_b <> r_e_ini.num_emp) y no eof (f_b)

Leer (f_b,r_b)

Fin mientras

Si eof (f_b)

Entonces escribir (f_e_fin,r_e_fin)

Fin si

Cerrar (f_b)

Leer (f_e_ini,r_e_ini)

Fin mientras

Cerrar (f_e_ini)

Cerrar (f_e_fin)

Fin

Tenemos un fichero de clientes no clasificados y la clave del fichero de clientes es el D.N.I. y un fichero de morosos que contiene el D.N.I. y que está clasificado. Queremos obtener un listado de los clientes no morosos.

Leer (f_c,r_c)

Mientras no eof (fc)

Abrir (fm,”Morosos.dat”,entrada)

Leer (f_m,r_m)

Mientras r_c.DNI > r_m y no eof (f_m)

Leer (f_m,r_m)

Fin mientras

Si r_c.DNI <> r_m

Entonces escribir r_c.nombre

Fin si

Cerrar (f_m)

Leer (f_c,r_m)

Fin mientras

Tenemos un fichero de ventas que tiene el número de venta, total de venta y número de vendedor, sabemos que en nuestra empresa trabajan 5 vendedores numerados del 1 al 5.

Queremos saber el total vendido por cada vendedor.

Tipo venta: registro

Cod_venta: entero

Total: real

Vendedor: entero

Fin registro

Algoritmo ventas

Var

F_v: fichero de venta

R_v: venta

Vend: array [1..5] de real

I: entero

Inicio

Desde i=1 hasta 5

Vend[i] 0

Fin desde

Abrir (f_v,”ventas.dat”,entrada)

Leer (f_v,r_v)

Mientras no eof (f_v)

Vend[r_v.vendedor] vend[r_v.vendedor] + r_v.total

Leer (f_v,r_v)

Fin mientras

Cerrar (f_v)

Desde i=1 hasta 5

Escribir “El vendedor”i”ha vendido”vend[i]

Fin desde

Fin

“Acceso directo” en archivos secuenciales:

Existen lenguajes que tienen funciones que simulan el acceso directo a un registro dentro de un fichero secuencial (en Pascal Seek; en C fseek), a estas funciones le indicamos el número de registro (en Pascal) o el número de bytes (en C), y nos acceden directamente a esa posición.

Sin embargo es simulado, porque internamente esa función va a hacer una búsqueda secuencial hasta que haya llegado al número de registro o al número de bytes.

Mantenimiento de ficheros con organización directa:

• Alta: Primero hay que ver que no existe el registro, y si no existe se da de alta. Para ver si existe o no existe, a partir de la clave del registro que quiero dar de alta, calculo con la función de direccionamiento la posición en la que tendría que meter ese registro. Si esa posición está ocupada, no lo doy de alta y si no lo meto allí.

• Baja: Para ver si existe, hago igual que antes. Si existe lo marco como baja lógica, y cuando se reorganice el fichero, lo doy como baja física real.

• Modificación: Para ver si existe, hago igual que antes. Si existe lo modifico y lo vuelvo a grabar en la misma posición.

• Consultas: Tienen sentido las consultas de registros en particular con una determinada clave (a través de la función de direccionamiento), pero no las búsquedas secuenciales.

Mantenimiento de ficheros con organización secuencial indexada:

Es igual que en organización directa, pero a la hora de localizar un registro, en vez de aplicar una función de direccionamiento a su clave, utilizamos su clave para investigar a través de los índices en donde va a estar situado.

Las altas si las doy cuando el fichero se crea, se graban en el área de datos, y si el fichero ya existía se graban en el área de excedentes.

En las consultas tienen sentido tanto las consultas de un registro en particular como las consultas secuenciales a través de una clave porque van a estar todas seguidas.

No hay que confundir organización secuencial indexada, con ficheros indexados o de índices, que son un tipo especial de ficheros asociados a un fichero secuencial pero independiente de él, que me agilizan las búsquedas en el fichero secuencial en el que están indexados. Suelen utilizarse en bases de datos domésticas.

8. FICHEROS DE TEXTO:

Son un tipo de ficheros especiales, en cuanto a lo que podemos leer de ellos y escribir son cadenas de caracteres.

Sin embargo tienen significados distintos según el lenguaje, y su objetivo es que podemos trabajar con cadenas de caracteres.

F : Fichero de texto

C : Cadena

escribir (F, C)

leer (F, C)

EJERCICIOS: TEMA 8

Tenemos un array con la información de nuestros productos, por cada producto almacenamos su código, descripción, stock actual y stock mínimo.

Se trata de obtener otro array que contenga los productos de los que halla que hacer pedidos porque su stock sea inferior al mínimo, tal que al proveedor le tenemos que dar como datos la identificación del producto y la cantidad que pedimos, que coincidirá con el stock mínimo.

Normalmente trabajamos con 100 productos.

Tipo producto = registro

Codigo: entero

Descripción: cadena

Stock: entero

Stock_min: entero

Fin registro

Pedido = registro

Codigo: entero

Cantidad: entero

Fin registro

Lista_producto = array [1..100] de producto

Lista_pedido = array [1..100] de pedido

Algoritmo almacen

Var

Prod: lista_producto

Ped: lista_pedido

I,j: entero

Inicio

J 1

Desde i=1 hasta 100

Si prod[i].stock < prod[i].stock_min

Entonces ped[j].codigo prod[i].codigo

Ped[j].cantidad prod[i].stock_min

J j+1

Fin si

Fin desde

Fin

Dado un array que contiene la información de los alumnos de una clase de 100 alumnos, y teniendo en cuenta que de cada uno de ellos almacenamos su número de expediente, nombre y nota media. Hallar la media de todos los alumnos de esa clase y dar otra opción que pida el nombre de un alumno y me de su nota si este alumno existe.

Tipo alumno = registro

Expediente: entero

Nombre: cadena

Media: real

Fin registro

Lista = array[1..100] de alumno

Algoritmo notas

Var

Alum: lista

Op,i: entero

Marca: booleano

Inicio

Presentar (op)

Mientras (op <>0)

Según sea op

1: escribir “La media de la clase es”nota_media (alum)

2: escribir “Introduce un nombre”

leer nombre

marca falso

i 1

repetir

si comparar (alum[i].nombre,nombre) = verdadero

entonces marca = verdadero

sino i i+1

fin si

hasta (i > 100) o (marca=verdadero)

si marca = verdadero

entonces escribir “La nota de”nombre”es”alum[i].media

sino escribir “El alumno no existe”

fin si

fin según sea

presentar (op)

fin mientras

fin

Tenemos un array con la indicación de cada producto, stock, descripción y fecha. Hallar una opción que nos sirva iterativamente para hacer pedidos de productos y que termina cuando pidamos el producto 0.

Por cada pedido se da el identificador de producto que se pide, y la cantidad de producto, y lo que nos dice es si hay cantidad suficiente, respondiendo “Pedido suministrado” y actualizando el stock, y si el producto solicitado no existe o no hay suficiente cantidad, mostrará un mensaje de error explicando la causa.

Tipo t_fecha = registro

Dia: entero

Mes: entero

Anno: entero

Fin registro

Producto = registro

Codigo: entero

Descripicion: cadena

Stock: entero

Fecha: t_fecha

Fin producto

Lista = array[1..10] de producto

Algoritmo pedidos

Var

Prod: lista

Codigo,cantidad,i: entero

Marca: booleano

Inicio

Escribir “Introduce el codigo”

Leer codigo

Escribir “Introduce la cantidad”

Leer cantidad

Mientras codigo <> 0

I 1

Marca falso

Repetir

Si codigo = prod[i].codigo

Entonces marca verdadero

Sino i i+1

Fin si

Hasta (marca = verdadero) o (i > 100)

Si marca = falso

Entonces escribir “No existe el producto”

Sino si prod[i].stock < cantidad

Entonces escribir “No hay cantidad suficiente”

Sino prod[i].stock prod[i].stock - cantidad

Escribir “pedido suministrado”

Fin si

Fin si

Fin mientras

Fin

funcion nota_media (a: lista): real

var

i: entero

acum: real

inicio

acum 0

desde i=1 hasta 100

acum acum + a[i].nota

fin desde

retorno (acum/100)

fin nota_media

funcion comparacion (c1:cadena,c2:cadena): booleano

var

i: entero

inicio

i 1

mientras (c1[i]=c2[i]) y (c1[i]<>'$') y (c2[i]<>'$')

i i+1

fin mientras

si c1[i]=c2[i]

entonces retorno verdadero

sino retorno falso

fin si

fin comparacion

Procedimiento presentar (ent-sal opcion: entero)

Inicio

Repetir

Escribir “0. Salir”

Escribir “1. Hallar nota media”

Escribir “2. Hallar la nota de un alumno”

Escribir “Introduce una opción”

Leer opcion

Hasta (opcion >=0) y (opcion <=2)

Fin presentar

Tenemos un fichero de facturas. En la factura viene el número de cliente al que pertenece la factura, el número de factura, el importe de la factura y un campo pagado que será booleano.

El fichero está clasificado pro número de cliente y de factura.

Diseñar un programa que obtenga por pantalla para cada cliente el total que nos debe, y al final me dé el total de lo que la empresa no ha cobrado.

Tipo factura: registro

Num_cl: entero

Num_fact: entero

Importe: real

Pagado: boolean

Fin registro

Algoritmo facturas

Var

Fich: fichero de factura

Fact: factura

Total,deuda: real

Cliente: entero

Inicio

Abrir (fich,”facturas.dat”,entrada)

Leer (fich,fact)

Total 0

Mientas no eof (fich)

Deuda 0

Cliente fact.num_cl

Mientras (cliente = fact.num_cl) y no eof (fich)

Si fact.pagado = falso

Entonces deuda deuda + fact.importe

Total total + fact.importe

Fin si

Leer (fich,fact)

Fin mientras

Escribir “El cliente”cliente”debe”deuda

Fin mientras

Escribir “La empresa no ha cobrado”total

Fin

Tenemos un fichero de empleados que contiene el departamento, código de empleado, nombre, categoría y sueldo. Hay 12 categorías numeradas del 0 al 11.

Por cada departamento sacar el número total de empleados que tiene y el sueldo medio por departamento. Lo mismo hacerlo por categorías.

El fichero está clasificado por código de departamento y empleado.

Tipo emp: registro

Cod_dep: entero

Cod_emp: entero

Nomb_emp: cadena

Categoria: entero

Sueldo: real

Fin registro

Cat: registro

Sueldo: real

Emp: entero

Fin registro

Algoritmo empleados

Var

F_emp: fichero de emp

R_emp: emp

T_dep: real

N_dep,i,d: entero

C: array [0..11] de cat

Inicio

Desde i=0 hasta 11

C[i].sueldo 0

C[i].empleado 0

Fin desde

Abrir (f_emp,”empleados.dat”,entrada)

Leer (f_emp,r_emp)

Mientras no eof (f_emp)

D r_emp.cod_dep

T_dep 0

N_dep 0

Mientras (d=r_emp.cod_dep) y no eof (f_emp)

T_dep t_dep + r_emp.sueldo

N_dep n_dep + 1

C[r_emp.categoria].sueldo c[r_emp.categoria].sueldo + r_emp.sueldo

C[r_emp.categoria].emp c[r_emp.categoria].emp + 1

Leer (f_emp,r_emp)

Fin mientras

Escribir “El sueldo medio del departamento” d “ es” t_dep / n_dep

Fin mientas

Desde i = 0 hasta 11

Escribir “El sueldo de la categoría”i”es”c[i].sueldo/c[i].emp

Fin desde

Cerrar (f_emp)

Fin

Para controlar los stocks de un almacén tenemos:

• Un fichero “almacén”, no clasificado que contiene las existencias de cada producto en almacén, y sabemos que hay un máximo de 750 productos. Cada registro tiene el código de producto(1..750), la cantidad en stock de ese producto y el nombre del producto

• Un fichero “pedidos” que contiene todos los pedidos que se solicitan al almacén. Cada pedido contiene el número de pedido, el código de producto que se pide y la cantidad que se pide. Este fichero está clasificado por número de pedido.

Obtener un fichero de stock actualizado a partir de los pedidos, pudiéndose dar:

El producto que se pide existe en el almacén y que la cantidad que se pide sea menor o igual a la que hay. Sólo se actualiza el fichero.

El producto existe, pero la cantidad que nos piden es mayor que la que hay. Guardaremos la información del pedido en el fichero “denegados” que tiene el código del producto, la cantidad pedida y la cantidad que había en stock.

El código de producto no existe. Mostramos por pantalla un mensaje que ponga “Código de producto erroneo”.

Cada producto aparece como máximo una vez.

Tipo alm: registro

Prod: entero

Stock: entero

Fin registro

Ped: registro

N_ped: entero

Prod: entero

Cant: entero

Fin registro

Den: registro

Prod: entero

Stock: entero

Cant: entero

Fin registro

Algoritmo almacén

Var

F_a,f_al: fichero de alum

F_d: fichero de den

F_p: fichero de pedidos

R_a: alm

R_p: ped

R_d: den

Inicio

Abrir (f_p,”pedidos.dat”,entrada)

Abrir (f_n,”almacen_n.dat”,salida)

Abrir (f_d,”denegados.dat”,salida)

Leer (f_p,r_p)

Mientras no eof (f_p)

Abrir (f_a,”almacen.dat”,entrada)

Leer (f_a,r_a)

Mientras (r_p.prod <> r_a.prod) y no eof (f_a)

Leer (f_a,r_a)

Fin mientras

Si r_p.prod = r_a.prod

Entonces si r_p.cantidad < r_a.stock

Entonces r_an.prod r_a.prod

R_an.stock r_a.stock - r_p.cantidad

Escribir (f_an,r_an)

Sino r_d.prod r_a.prod

R_d.cant r_p.cant

R_d.stock r_a.stock

Escribir (f_d,r_d)

Fin si

Sino escribir “Error. No existe el producto”r_p.producto

Fin si

Cerrar (f_a)

Leer (f_p,r_p)

Fin mientras

Cerrar (f_p)

Cerrar (f_d)

Cerrar (f_an)

Actualizar_almacen (f_a,f_an)

Fin

Procedimiento actualizar_almacen (f1: fichero de almacen; f2: fichero de almacen)

Var

R1,r2: alm

F3: fichero de alm

Inicio

Abrir (f1,”almacen.dat”,entrada)

Abrir (f3,”alm.act”,salida)

Leer (f1,r1)

Mientras no eof (f1)

Abrir (f2,”almacen_n.dat”,entrada)

Leer (f2,r2)

Mientras (r1.prod <> r2.prod) y no eof (f2)

Leer (f2,r2)

Fin mientras

Si r1.prod = r2.prod

Entonces escribir (f3,r2)

Sino escribir (f3,r1)

Fin si

Cerrar (f2)

Fin mientras

Cerrar (f1)

Cerrar (f3)

Fin

ORDENACIÓN, BÚSQUEDA E INTERCALACIÓN INTERNA:

TEMA 9

Introducción.

Ordenación:

• Método de la burbuja.

• Método de inserción.

• Método de selección.

• Método de Quick Short.

Búsqueda:

• Búsqueda secuencial.

• Búsqueda binaria.

• Búsqueda por conversión de claves o Hashing.

Intercalación.

1. INTRODUCCIÓN:

A la hora de tratar datos, muchas veces nos conviene que estén ordenados. Estos métodos nos pueden resultar eficientes cuando hacemos las búsquedas.

2. ORDENACIÓN:

Consiste en organizar un conjunto de datos en un orden determinado según un criterio.

La ordenación puede ser interna o externa:

• Interna: La hacemos en memoria con arryas. Es muy rápida.

• Externa: La hacemos en dispositivos de almacenamiento externo con ficheros.

Para determinar lo bueno que es un algoritmo de ordenación hay que ver la complejidad del algoritmo (cantidad de trabajo de ese algoritmo), se mide en el número de operaciones básicas que realiza un algoritmo. La operación básica de un algoritmo es la operación fundamental, que es la comparación.

Método de la burbuja:

La filosofía de este método es ir comparando los elementos del array de 2 en 2 y si no están colocados correctamente intercambiarlos, así hasta que tengamos el array ordenado.

Hay que comparar la posición 1 y la 2 y si no están ordenadas las intercambio. Luego la 2 y la 3 y así sucesivamente hasta que comparo las últimas posiciones.

Con esta primera pasada lograremos que quede ordenado el último elemento del array.

Teóricamente, en cada pasada iremos colocando un elemento, y tendríamos que hacer n -1 pasadas. Si en una pasada no se hacen cambios, el array ya está ordenado.

Procedimiento burbuja (datos: array [1..N] de <tipo>)

Var

Ordenado: booleano

I, J: entero

Aux: <tipo>

Inicio

Ordenado falso

I 1

Mientras (ordenado = falso) y (i <> n - 1)

Ordenado verdadero

J I

Desde j = 1 hasta n - 1

Si datos [j] > datos [j + 1]

Entonces aux datos [j]

Datos [j] datos [j + 1]

Datos [j] aux

Ordenado falso

Fin si

Fin desde

I I + 1

Fin mientras

Fin

Método de inserción:

Se supone que se tiene un segmento inicial del array ordenado, y hay que ir aumentando la longitud de segmento hasta que coincide con la longitud del array.

Para ello insertaremos el siguiente elemento en el lugar adecuado dentro del segmento ordenado.

Esto se hace moviendo cada elemento del segmento ordenado a la derecha hasta que se encuentre uno menor o igual al elemento que queremos colocar en el segmento o hasta que no tenemos elementos, y lo coloco en esa posición.

Para arrancar este método se parte de que el segmento ordenado inicial este es la primera posición.

Procedimiento insercion (datos: array [1..N] de <tipo>)

Var

I, J: entero

Aux: <tipo>

Inicio

Desde i = 2 hasta N

Aux datos [i]

J i - 1

Mientras (j > 0) y (aux < datos[j])

Datos[j + 1] datos[j]

J j - 1

Fin mientras

Datos [j + 1] aux

Fin desde

Fin

Método de la selección:

Se trata de buscar el elemento más pequeño y colocarlo en la primera posición, después el segundo más pequeño y colocarlo en la segunda posición, y así sucesivamente hasta que el array este ordenado.

Para ello vamos a recorrer el array, y por cada elemento buscamos a la derecha de esa posición cual es el más pequeño, y lo intercambio con el elemento que estoy examinando.

Procedimiento selecccion (datos: array[1..N] de <tipo>)

Var

I,j,pos: entero

Aux: <tipo>

Inicio

Desde i = 1 hasta N-1

Aux datos[i]

Pos i

Desde j = i+1 hasta N

Si datos[j] < aux

Entonces pos j

Aux datos[j]

Fin si

Fin desde

Datos[pos] datos[i]

Datos[i] aux

Fin desde

Fin

Método de ordenación rápida o QuickShort:

Consiste en dividir la lista inicial en otras dos que ordenamos por separado recursivamente.

Para ello, se elige un elemento de la lista al que llamamos pivote, tal que a la derecha del pivote va a quedar lo más grande, y a la izquierda lo más pequeño, es decir, que el pivote quedará colocado en su posición.

Procedimiento QuickShort (ini: entero; fin: entero; datos: array[1..N] de <tipo>)

Inicio

Si ini < fin

Entonces sublistas (ini,fin,pivote,datos)

Quickshort (ini,pivote-1,datos)

Quickshort (pivote+1,fin,datos)

Fin si

Fin

Procedimiento sublistas (ini:entero;fin:entero;ent-sal pivote:entero;

datos:array[1..N]de <tipo>)

Inicio

Pivote ini

Aux datos[ini]

Desde i = pivote+1 hasta fin

Si datos[i] < aux

Entonces pivote pivote + 1

Aux2 datos[i]

Datos[i] datos[pivote]

Datos[pivote] aux2

Fin si

Fin desde

Datos[ini] datos[pivote]

Datos[pivote] aux

Fin

3. BÚSQUEDAS:

Hay 2 tipos de búsquedas, internas que se hacen en memoria y externas que se hacen en ficheros. Cuando buscamos en un fichero, normalmente lo hacemos a través de una clave.

Dado un determinado valor, se trata de ver si existe un elemento con ese valor en el array de ficheros donde se busca, tal que se devuelve si está o no.

Existen 3 métodos de búsqueda:

• Secuencial.

• Binaria o dicotónica.

• Por transformación de claves o Hashing.

Búsqueda secuencial:

Se puede aplicar para búsquedas internas y externas, y hay que ir pasando secuencialmente por todos los elementos de la estructura hasta encontrar el elemento o acabar la lista.

Procedimiento b_secuencial (datos: array[1..N] de <tipo>; elem: <tipo>)

Var

I: entero

Inicio

I 1

Mientras (i <= N) y (datos[i] <> elem)

I I + 1

Fin mientras

Si datos[i] = elem

Entonces escribir “Elemento encontrado en la posición”i

Sino escribir “Elemento no encontrado”

Fin si

Fin

Búsqueda secuencial con centinela:

Se trata de optimizar en cierto modo la búsqueda secuencial normal, lo que hacemos es añadir al final del array el elemento que quiero buscar por lo que siempre lo encontrare.

Si encuentro el elemento en una posición distinta de N+1 significa que no está en la estructura. La ventaja es que en la condición del mientras no tengo que preguntar si se acaba la estructura, me ahorro una condición, el inconveniente es que tiene que sobrar espacio al final del array.

Procedimiento b_sec_centineal (datos: array[1..N+1] de <tipo>; elem: <tipo>)

Var

I: entero

Inicio

Datos[n+1] elem

I 1

Mientras datos[i] <> elem

I i+1

Fin mientras

Si i <> n+1

Entonces escribir “Elemento encontrado en la posición”i

Sino escribir “Elemento no encontrado”

Fin si

Fin

Búsqueda binaria o dicotónica:

Para que se pueda aplicar es que la lista en la que queremos buscar el elemento este previamente ordenada.

Se trata de dividir el espacio de búsqueda en sucesivas mitades hasta encontrar el elemento buscado o hasta que ya no pueda hacer más mitades.

Primero hallamos el índice de la mitad del array y miramos si el elemento coincide con él, sino coincide averiguamos donde debería estar el elemento buscado, si en la lista de la derecha o de la izquierda, y dentro de esa mitad hago lo mismo sucesivamente.

Procedimiento b_binaria (datos:array [1..N] de <tipo>; elem:<tipo>; ini:entero;

fin: entero)

Var

mit: entero

Inicio

mit (ini+fin) div 2

mientras (ini < fin) y (elem <> datos[mit])

si elem < datos[mit]

entonces fin mit - 1

sino ini mit + 1

fin si

fin mientras

si ini < fin

entonces escribir “Elemento encontrado en la posición” mit

sino escribir “Elemento no encontrado”

fin si

fin

Búsqueda por transformación de claves o Hashing:

Es necesario que lo que se busque sea por un determinado campo clave. Se trata de convertir ese campo clave en una dirección real, si estamos en un array, en un posición del array y si estamos en un fichero, en un registro del fichero.

Lo que hace que se convierta la clave en una dirección real es la función de direccionamiento. Existen diferentes tipos de funciones de direccionamiento:

• La más usada es la función módulo, que consiste en dividir la clave entre el número de elementos máximos de la estructura y coger el resto como dirección real de almacenamiento (el índice si es un array, o una dirección relativa si es un fichero).

• Entruncamiento: Es la parte de la clave como índice.

• Plegamiento: Dividir la clave en partes iguales de tamaño, que va a ser igual al número de cifras del tamaño del array, luego sumarlas y coger las últimas cifras de la suma.

• Mitad del cuadrado: Es el cuadrado de la clave y después coger las cifras centrales.

El problema de estos casos, es que cuando el rango de claves es mayor que el número de posiciones de la estructura, está el problema de que a diferentes claves les corresponde la misma posición, así que cuando se produce el segundo sinónimo hay que ver donde se manda.

Para evitar esto, tratar que la función de direccionamiento produzca el menor número de colisiones posibles.

Para solucionar el problema de los sinónimos:

• Dejar tanto espacio como rango de claves. Es ilógico.

• Si se trata de un array, que por cada posición dejemos una posición más.

• La mejor solución es la técnica de encadenamiento, que consiste en que de cada posición del array salga un puntero a una lista enlazada que enlace a todos los elementos que deberían ir posicionados en esa posición o índice del array.

4. INTERCALACIÓN:

Consiste en juntar varias listas ordenadas en una sola lista que quede ordenada.

Procedimiento fusion (a1: T1; a2: T2; a3: T3)

Var

I,j,k,l: entero

Inicio

I 1

J 1

K 1

Mientras (i<=n) y (j<=m)

Si a1[i] < a2[j]

Entonces a3[k] a1[i]

I I + 1

Sino a3[k] a2[j]

J J + 1

Fin si

K K + 1

Fin mientras

Si i < n

Entonces desde L=i hasta m

K k +1

A3[k] a2[l]

Fin desde

Sino desde L=j hasta n

K k+1

A3[k] a1[l]

Fin desde

Fin si

Fin

ORDENACIÓN, BÚSQUEDA Y FUSIÓN EXTERNA:

TEMA 10

Archivos ordenados.

Fusión o mezcla de archivos ordenados.

Partición de archivos.

Clasificación de archivos.

1. ARCHIVOS ORDENADOS:

Un archivo se puede ordenar por un campo o un conjunto de campos. La mayor parte de los sistemas disponen de una función SORT para ordenar.

2. FUSIÓN O MEZCLA DE ARCHIVOS ORDENADOS:

Dados 2 archivos A y B que tienen la misma estructura y clasificados por el mismo campo o campos, se trata de obtener otro archivo C que tenga la misma estructura de los 2 anteriores y que también queda clasificado por el mismo criterio.

Procedimiento fusion (A: t_fich; B: t_fich; C: t_fich)

Var

R1, r2: <tipo>

Inicio

Abrir (C,”fich.sal”,salida)

Abrir (A,”fich1”,entrada)

Abrir (B,”fich2”,entrada)

Leer (A,r1)

Leer (B,r2)

Mientras no eof (A) y no eof (B)

Si r1.info < r2.info

Entonces escribir (C,r1)

Leer (A,r1)

Sino escribir (C,r2)

Leer (B,r2)

Fin si

Fin mientras

Si eof (A)

Entonces leer (B,r2)

mientras no eof (B)

Escribir (C,r2)

Leer (B,r2)

Fin mientras

Sino leer (A,r1)

mientras no eof (A)

Escribir (C,r1)

Leer (A,r1)

Fin mientras

Fin si

Cerrar (A)

Cerrar (B)

Cerrar (C)

Fin

3. FUSIÓN DE ARCHIVOS:

Se trata de dividir un archivo en varios. Hay diferentes criterios de partición:

Partición por contenido:

Se reparten los registros entre varios registros según el valor de uno o más campos.

< V1 F1

= V1 F2

> V1 F3

Procedimiento part_cont (fich: t_fich; ent-sal fich1, fich2, fich3: t_fich)

Var

R: <tipo>

Inicio

Abrir (fich,”F”,entrada)

Abrir (fich1,”F1”,salida)

Abrir (fich2,”F2”,salida)

Abrir (fich3,”F3”,salida)

Leer (fich,r)

Mientras no eof (fich)

Si r.info < V1

Entonces escribir (f1,r)

Sino si r.info > V1

Entonces escribir (f3,r)

Sino escribir (f2,r)

Fin si

Fin si

Leer (fich,r)

Fin mientras

Cerrar (fich)

Cerrar (f1)

Cerrar (f2)

Cerrar (f3)

Fin

Partición por número fijo de registros o por secuencias con clasificación interna:

Se trata de obtener a partir de un fichero varios, tal que todos tengan un número fijo de registros excepto el último.

Si el fichero inicial tiene X registros y quiero obtener como resultado Y ficheros, cada fichero tendrá X/Y registros.

Se trata de ir leyendo secuencias de X/Y registros del fichero F y se vuelcan a un array, clasificar esas secuencias internamente, y cuando estén clasificadas, las vuelco a otro fichero.

El problema es que se usa arrays para la ordenación interna, y a veces el número de ficheros dependen del tamaño máximo del array.

F: 3 9 5 14 2 30 1

F1: 3 5 9

F2: 2 14 30

F3: 1

Partición por secuencias sin clasificación interna:

Se trata de obtener ficheros a partir de uno dado, todos con el mismo tamaño, pero los ficheros no tienen por que estar clasificados.

Nosotros marcamos el tamaño del bloque donde vaya a clasificar la información. Determino también el número máximo de ficheros que quiero tener.

Leeré secuencias de N registros del fichero inicial y los iré grabando en los ficheros resultantes de la partición.

4. CLASIFICACIÓN DE ARCHIVOS:

Es obligatorio que exista una clave. Si el fichero fuese pequeño se llevan todos los registros a un array y los clasifico, pero esto no es lo más usual, por lo que se usa la clasificación externa.

Clasificación por mezcla directa:

Vamos a usar 2 ficheros auxiliares F1 y F2. El fichero F lo organizamos grabando en F secuencias de registros ordenados cada vez más grandes.

Primero leemos las secuencias de un registro de F y las grabo alternativamente en F1 y F2.

Luego leo las secuencias de un registro, una de F1 y otra de F2, y las grabo ordenadas en F.

Vuelvo a leer en F con el doble de secuencia que antes y los grabo en F1 y F2, y repetimos todas las fases duplicando en cada pasada el tamaño de la secuencia hasta que el tamaño obtenido sea igual que el del fichero. A cada tratamiento de F se le llama pasada, y el número de pasadas máximo, será I, tal que el tratamiento se repetirá hasta que 2 elevado a I >= número de registros.

En cada pasada para clasificar la secuencia que leemos de F1 y F2, utilizamos el método de fusión externa.

F: 3 9 5 14 2 30 1 12 10

F1: 3 / 5 / 2 / 1 / 10

F2: 9 / 14 / 30 / 12

F: 3 9 5 14 2 30 1 12 10

F1: 3 9 / 2 30 / 10

F2: 5 14 /1 12

F: 3 5 9 14 1 2 12 30 10

F1: 3 5 9 14 / 10

F2: 1 2 12 30

F: 1 2 3 5 9 12 14 30 / 10

F1: 1 2 3 5 9 12 14 30

F2: 10

F: 1 2 3 5 9 10 12 14 30

Clasificación por mezclas de secuencias equivalentes:

Se parece al método anterior porque también se intenta coger secuencias de registros más grandes, pero ahora usamos 4 ficheros auxiliares y en vez de empezar leyendo secuencias de un registro, hacemos secuencias de N registros, que la primera vez clasificamos internamente, por lo que el valor de N vendrá limitado por el tamaño del array.

Primero leemos del archivo inicial F secuencias de N registros que clasificamos internamente y que grabamos alternativamente en F1 y F2.

Después leo secuencias de N registros de F1 y F2 alternativamente, y por cada par de secuencias leídas las fusiono y las grabo alternativamente ya ordenadas en F3 y F4.

Las secuencias de 2N registros de F3 y F4 las fusiono y la secuencia 4N obtenida ya ordenada la grabo alternativamente en F1 y F2.

Repito esto hasta que todos los ficheros estén vacíos menos 1, y la información de ese fichero la grabo al fichero inicial.

F: 3 9 5 14 2 30 1 12 10

F1: 3 5 9 / 1 10 12

F2: 2 14 30

F1: Vacio

F2: Vacio

F3: 2 3 5 9 14 30

F4: 1 10 12

F1: 1 2 3 5 9 12 14 30 Vuelco F1 al fichero inicial F.

F2: Vacio

F3: Vacio

F4: Vacio

ESTRUCTURAS DINÁMICAS LINEALES DE DATOS:

LISTAS ENLAZADAS. PILAS Y COLAS:

TEMA 11

Introducción a las estructuras dinámicas de datos.

Listas.

Listas enlazadas.

Procesamiento de listas enlazadas simples.

Listas circulares con cabecera.

Listas doblemente enlazadas.

Pilas.

Colas.

Dobles colas o bicolas.

1. INTRODUCCIÓN A LAS ESTRUCTURAS DINÁMICAS DE DATOS:

Las ventajas de las estructuras dinámicas de datos son:

No hay que definir el tamaño antes de usarla, sino que la voy utilizando según la necesito.

Los elementos que forman está estructura no están situados en forma contigua en memoria, y esos elementos se relacionan entre sí mediante campos enlace o puntero, y a cada uno de esos elementos lo llamamos nodo de la estructura.

Un puntero es un dato cuyo contenido es una dirección de memoria que es en la que está almacenado el dato al que apunta.

Las estructuras dinámicas pueden ser lineales o no lineales según que desde un elemento se pueda acceder solamente a otro o a varios.

Declaración de los punteros en distintos lenguajes:

En C: <tipo> *<var_p>

Int *p

En Pascal: <var_tipo_puntero>: ^<tipo>

P: ^integer

En pseudocódigo: <var_tipo_puntero>: puntero a <tipo>

P: puntero a entero

Acceder a un campo de un registro:

En C: P nombre

En Pascal: p^.nombre

En pseudocódigo: p nombre

2. LISTAS:

Una lista es una colección lineal de elementos. Hay 2 formas de almacenarla. Con arrays (usando memoria estática), en donde la relación de los elementos de la lista viene dada porque ocupa posiciones contiguas de memoria.

De forma enlazada con memoria dinámica. Se conoce como listas enlazadas, y la relación entre los elementos de la lista se mantiene mediante campos de enlace o punteros.

3. LISTAS ENLAZADAS:

Es una colección lineal de elementos llamados NODOS, donde el orden entre los nodos se establece mediante punteros, y por ser simple, además desde un nodo solo puedo acceder al siguiente directamente.

Una lista enlazada tiene 2 partes:

• Los nodos que forman la lista. Cada nodo va a tener dos campos. Uno de información que será del tipo de los elementos que contiene la lista y un campo de enlace que es de tipo puntero, y que contendrá la dirección de memoria en la que está almacenado el siguiente nodo.

Al primer campo de información lo llamamos INFO, y el nodo lo llamamos SIG.

• La segunda parte de la lista será una variable de tipo puntero a los nodos de la lista que contiene la dirección del primer nodo de la lista. Por esa razón a esa variable la podemos llamar COMienzo.

Tipo nodo: registro

Info: <tipo>

Sig: puntero a nodo

Fin registro

Var

Com: puntero a nodo

El último nodo de la lista tendrá en su campo de enlace el valor nodo (Null,Nil), que quiere decir que no apunta a ninguna dirección y gráficamente se simboliza con:

Tipo nodo: registro

Info: carácter

Sig: puntero a nodo

Fin registro

Los nodos de la lista pueden estar en cualquier zona de memoria, no tienen que estar en posiciones consecutivas.

4. PROCESAMIENTO DE LISTAS ENLAZADAS SIMPLES:

Para poder procesar una lista, se necesita la estructura de sus nodos y la variable de comienzo.

Operaciones:

• Insertar un elemento.

• Borrar un elemento.

• Recorrer la lista.

• Buscar un elemento.

La forma más normal de representar listas enlazadas es usar memoria dinámica. Una lista enlazada también se puede simular usando arrays (memoria estática), pero es poco eficiente.

Para ello utilizaría 2 arrays del mismo tamaño y con la misma numeración de índices, tal que en un array guardaría los campos de información de la lista, y para cada campo de información en la posición correspondiente en el otro array guardaría el índice del siguiente elemento a ese nodo.

Es decir en ese segundo array guardaría los campos enlace mediante valores de índice.

a h . i z Además de los 2 arrays, tengo que tener una variable que contenga el índice del primer elemento de la lista. El último elemento, tiene en el campo de enlace el valor 0.

Info Sig

1

2

3 H 5

4

5 .

6

A

7

I 3 8 10

9

10 Z 0

Recorrido e una lista enlazada:

Consiste en paras por todos sus nodos y procesarlos.

Tipo nodo: registro

Info: <tipo>

Sig: puntero a nodo

Fin registro

Algoritmo recorrido

Var

Com: puntero a nodo

Inicio

Recorrer (com)

Fin

Procedimiento recorrer (prin: puntero a nodo)

Var

Ptr: puntero a nodo

Inicio

Si prin = Nil

Entonces escribir “Lista vacia”

Sino ptr prin

Mientras ptr <> nil ptrsig <> nil

{procesar ptrinfo}

ptr ptrsig

fin mientras posicionarme en el último nodo

fin si .

fin

Busqueda de un nodo:

Se trata de localizar un nodo que cumpla una determinada condición (por ejemplo que su campo de información valga un valor determinado).

A la hora de hacer las búsquedas tendremos en cuenta si la lista está ordenada o no, y si está ordenada por el criterio de búsqueda tendré que aprovecharlo.

Tipo nodo: registro

Info: <tipo>

Sig: puntero a nodo

Fin registro

Algoritmo busqueda

Var

P,com: puntero a nodo

Elem: <tipo>

Inicio

Buscar (com,elem,p)

Fin

Procedimiento buscar (prin: puntero a nodo; e: <tipo>; ent-sal pos: puntero a nodo)

Inicio

Pos prin

Mientras (posinfo <> E) y (pos <> NIL)

Pos possig

Fin mientras

Fin

Búsqueda de un nodo ordenado ascendentemente:

Tipo nodo: registro

Info: <tipo>

Sig: puntero a nodo

Fin registro

Algoritmo busqueda

Var

P,com: puntero a nodo

Elem: <tipo>

Inicio

Buscar (com,elem,p)

Fin

Procedimiento buscar (prin: puntero a nodo; e:<tipo>;ent-sal pos: puntero a nodo)

Inicio

Pos prin

Mientras (e > posinfo) y (pos <> NIL)

Pos possig

Fin mientras

Si posinfo <> e

Entonces pos NIL

Fin si

Fin

Tratamiento de la memoria dinámica:

Siempre que se hace una inserción en una estructura dinámica, tenemos que coger de memoria tantos bytes de memoria dinámica como ocupa el nodo de la estructura dinámica, y cuando borramos un elemento, tendremos que liberar la memoria ocupada por ese elemento. Para conseguir este manejo, todos los lenguajes de programación tienen 2 instrucciones que permiten reservar memoria y liberar memoria dinámica, y asignar en el caso de la reserva la memoria a un puntero, y en el caso de la liberación se libera la memoria asignada a un puntero.

Pascal : NEW , DISPOSE

C : MALLOC , FREE

C++ : NEW , DELETE

La instrucción de reserva de memoria llevara un único argumento, que será el tipo de datos para el que se hace la reserva de memoria, y según el tamaño de ese tipo, esa instrucción sabrá el número de bytes que tiene que reservar. Y lo que devuelve es un puntero al comienzo de la zona que se ha reservado. Este valor devuelto será el que tenemos que asignar a un puntero al tipo de datos para el que se hace la reserva.

La función liberar memoria lleva un único argumento que es el tipo puntero, y lo que hace es liberar la memoria asignada a ese puntero, para lo cual es imprescindible que a ese puntero previamente se le haya hecho una asignación de memoria dinámica con al función de reserva.

Var p: puntero a <tipo>

P = res_mem (<tipo>)

Lib_mem (<var_puntero>)

Nosotros vamos a simular el tratamiento de la memoria dinámica de la siguiente forma: Vamos a suponer que todas las posiciones libres de memoria están enlazadas entre sí a través de una lista enlazada, a la que vamos a llamar DISP (lista de memoria disponible), donde la primera posición de esa lista viene apuntada por la variable DISP.

Cada vez que queremos hacer una inserción en una estructura dinámica, cogeremos la primera posición de DISP, y se la asignaremos al puntero que va a contener a ese elemento.

Y cuando queramos borrar un elemento de una estructura dinámica para indicar que liberamos la memoria utilizada por ese elemento, lo que haremos será insertarlo en el DISP, pero siempre al comienzo.

Según esto, todo borrado en el DISP equivaldrá a una instrucción de reserva de memoria en cualquier lenguaje, y toda inserción en el DISP, equivaldrá a la instrucción de liberar memoria en cualquier lenguaje.

Overflow y Underflow:

La memoria del ordenador tiene un tamaño limitado, por lo que la memoria dinámica también tendrá un tamaño limitado, es decir, que puede ser que se nos agote.

Esta situación, se conoce como OVERFLOW.

Siempre que se haga una instrucción de reserva de memoria, tendremos que comprobar antes si nos queda memoria libre. Eso en cualquier lenguaje ocurre cuando la instrucción de reservar de memoria devuelve el valor NIL.

Si DISP = Nil

Entonces escribir “No hay memoria”

Igual se hace para borrar un elemento de una estructura dinámica, para borrarlo, esa estructura tiene que tener al menos un elemento. Si no lo tiene e intentamos borrarlo, se produce un UNDERFLOW.

Por esto, lo primero que tenemos que probar en una estructura dinámica, es preguntar si tiene algo.

Si comienzo = Nil

Entonces escribir “Lista Vacia”

Si sólo manejo una estructura dinámica, pregunto por DISP, si trabajo con varias estructuras dinámicas cada una de un tipo, habrá tantas DISP como estructuras dinámicas.

Inserción en una lista enlazada:

Antes de realizar cualquier proceso de inserción, tendré que ver si me queda memoria disponible. Si es posible hacer la inserción, lo primero será reservar la memoria para el elemento que quiero reservar. Para nosotros será coger el primer elemento de DISP.

En segundo lugar, asignaremos los valores correctos al elemento que vamos a insertar, es decir, asignaremos al campo de información del nuevo elemento con la información, y después actualizamos el campo de enlace.

A la hora de asignar un valor al campo de enlace, lo primero será localizar la posición en la que tenemos que localizar el siguiente elemento, y se pueden dar los siguientes casos:

Inserción al comienzo de la lista: Se modifica el valor de la variable comienzo.

Inserción en cualquier otro lugar de la lista, incluido el final: En este caso, tendremos que conocer también el nodo que va a estar delante de la posición de inserción, ya que a la hora de insertar ese nuevo elemento, va a ocurrir que el nodo de la posición anterior a la de inserción apunte al nuevo elemento, y que el nuevo apunte al nodo de la posición a la que insertamos.

A la hora de localizar la posición de inserción dependerá de la aplicación en particular.

Como ejemplo de inserción, vamos a dar la inserción en una lista ordenada ascendentemente por el campo de información:

Tipo nodo: registro

Info: <tipo>

Sig: puntero a nodo

Fin registro

Procedimiento insercion (ent-sal com: puntero a nodo; elem:<tipo>)

Var

Lug, Lugp, nuevo: puntero a nodo

Inicio

Si DISP = Nil

Entonces escribir “No hay memoria disponible”

Sino nuevo DISP

DISP DISPSIG

Nuevoinfo elem

Si (com = Nil) o (elem < cominfo)

Entonces nuevosig Com

Com nuevo

Sino lugp com

Lug comsig

Mientras (elem > luginfo) y (lug <> Nil)

Lugp lug

Lug lugsig

Fin mientras

Nuevosig lug

Lugpsig nuevo

Fin si

Fin si

Fin

Borrado en una lista enlazada:

Se trata de borrar un nodo que contenga una determinada información de una lista enlazada simple, aunque el criterio de borrado podría ser otro en lugar del campo de información.

Siempre que se hace un borrado de una estructura dinámica, en general, lo primero es comprobar que la estructura no está vacía, y una vez determinado esto, tendré que localizar el nodo a borrar.

Se pueden dar 2 casos:

• El nodo a borrar sea el primero.

• Que el nodo a borrar ocupe cualquier otra posición.

Si es el del comienzo, cambiará la variable de comienzo de la lista porque ahora tendrá que apuntar al siguiente elemento, al de comienzo. Si el elemento ocupa cualquier otra posición, tendré que localizar la posición del elemento y de su predecesor, porque para desenlazarlo de la lista, el predecesor tendrá que apuntar al elemento que le sigue al nodo a borrar.

Finalmente, una vez desenlazado el nodo, habrá que liberar la memoria que ocupaba. Eso en cualquier lenguaje equivale a hacer la operación de liberar memoria, y en pseudocódigo sería insertar el elemento al principio de DISP.

Procedimiento borrar (ent-sal com: puntero a nodo; elem: <tipo>)

Var

Lug, lugp: puntero a nodo

Inicio

Si com = Nil

Entonces escribir “Lista vacia”

Sino lugp nil

Lug com

Mientras (elem > luginfo) y (lug <> Nil)

Lugp lug

Lug lugsig

Fin mientras

Si elem <> luginfo

Entonces escribir “No existe el nodo a borrar”

Sino Si lugp = Nil

Entonces com comsig

Sino lugpsig lugsig

Fin si

Lugsig DISP

DISP lug

Fin si

Fin si

Fin

5. LISTAS CIRCULARES CON CABECERA:

Una lista con cabecera, en general es una lista enlazada simple normal, pero en la que el primer nodo es un nodo especial que no sirve para guardar información válida, sino solamente para marcar que es el primer nodo.

Cabecera

Hay dos tipos de listas enlazadas con cabecera:

• Listas enlazadas con cabecera y tierra: El primer nodo va a ser la cabecera, y el último apunta a nil. No se utiliza porque perdemos un nodo y no tienen ventajas.

• Listas circulares con cabecera: Se caracterizan porque tienen un nodo cabecera, y además el último nodo apunta al nodo cabecera.

En cualquier lista enlazada con cabecera el primer nodo con información útil es el siguiente a comienzo (Comsig).

En una lista circular con cabecera, la ventaja que presenta respecto a una normal, es que en las inserciones y borrados no hay que suponer ningún caso especial, pues todos los nodos, incluido el primero útil, tienen un predecesor.

Al recorrer la lista completa, empezaremos buscando la información por el siguiente a comienzo, y sabemos que hemos llegado al final de la lista cuando el siguiente al puntero que recorre la lista sea comienzo.

Búsqueda en una lista circular con cabecera:

Procedimiento busqueda (com: puntero a nodo; elem:<tipo>)

Var

Ptr: puntero a nodo

Inicio

Ptr comsig

Mientras (ptrinfo <> elem) y (ptr <> com)

Ptr ptrsig

Fin mientras

Si ptrsig = com

Entonces escribir “Elemento no encontrado”

Fin si

Fin

Inserción en una lista circular con cabecera:

Procedimiento insercion (com: puntero a nodo; elem: <tipo>)

Var

Lug,lugp,nuevo: puntero a nodo

Inicio

Si DISP = Nil

Entonces escribir “No hay memoria”

Sino nuevo DISP

DISP DISPsig

Nuevoinfo Elem

Lugp com

Lug comsig

Mientras (elem > luginfo) y (lug <> com)

Lugp lug

Lug lugsig

Fin mientras

Nuevosig lug

Lugpsig nuevo

Fin si

Fin

Borrado en una lista circular con cabecera:

Procedimiento borrado (com: puntero a nodo; elem:<tipo>)

Var

Lug,lugp: puntero a nodo

Inicio

Si com=comsig

Entonces escribir “Lista vacia”

Sino lugp com

Lug comsig

Mientras (luginfo <> elem) y (lug <> com)

Lugp lug

Lug lugsig

Fin mientras

Si lug = com

Entonces escribir “Elemento no encontrado”

Sino lugpsig lugsig

Lugsig DISP

DISP lug

Fin si

Fin si

Fin

6. LISTAS DOBLEMENTE ENLAZADAS:

Las listas enlazadas simples se caracterizan porque desde un nodo solo puedo acceder al siguiente a ese nodo, por lo que solo puedo acceder al siguiente a ese nodo, por lo que solo puedo recorrer la lista en un sentido, de principio a fin.

Las listas dobles se caracterizan porque desde un nodo podemos acceder directamente tanto al siguiente como al anterior a ese. Es decir, por cada nodo tendremos 2 campos enlace, uno para enlazar un nodo con el siguiente, y otro para enlazar a un nodo con el nodo anterior a él.

De esta manera, la lista la podemos recorrer en los 2 sentidos, de principio a fin, moviéndonos con el enlace al nodo siguiente o de fin a principio moviéndonos con el enlace al nodo anterior. Para que se pueda hacer este segundo recorrido, además de una variable comienzo para cada lista, que contiene la dirección del primer nodo de la lista, necesitaremos también otra variable especial que denominaremos fin o final, que apunta al último nodo de la lista.

Según esto, la estructura de una lista doblemente enlazada, será la siguiente:

• Cada lista tendrá 2 variables, comienzo y final, del tipo puntero a nodo doble, que contendrán respectivamente la dirección al primer y último nodo de la lista.

• La estructura de cada nodo será:

Tipo nodo_doble: registro

Info: <tipo>

Sig: puntero a nodo_doble

Ant: puntero a nodo_doble

Fin registro

INFO

ant sig

El campo siguiente del último nodo tendrá valor NIL, y el campo anterior del primer nodo también tendrá valor NIL, para indicar que no hay nada antes del primer nodo.

La característica de una lista doblemente enlazada vacía es que el comienzo y el final son iguales y apuntan a NIL.

Si (com = final) y (com = Nil)

Lista doblemente enlazada con un solo elemento:

Si (com = final) y (com <> Nil)

Para implementar la inserción y el borrado de una lista doblemente enlazada, vamos a suponer que la lista de espacio disponible tiene la forma de una lista doblemente enlazada.

Recorrido de una lista doblemente enlazada:

Para pasar por todos los nodos de la lista, podemos hacerlo igual que una lista enlazada simple, solo que ahora la podemos recorrer la lista hacia delante con el campo SIG, y hacia atrás con el campo ANT.

Recorrido hacia delante:

Procedimiento recorrido_adelante (com: puntero a nodo doble)

Var

Ptr: puntero a nodo doble

Inicio

Ptr Comienzo

Mientras (ptr <> Nil)

{Procesar PTR.INFO}

ptr ptrsig

fin mientras

fin

Recorrido hacia atrás:

Procedimiento recorrido_adelante (com: puntero a nodo doble)

Var

Ptr: puntero a nodo doble

Inicio

Ptr Final

Mientras (ptr <> Nil)

{Procesar PTR.INFO}

ptr ptrant

fin mientras

Fin

Búsqueda en una lista doblemente enlazada:

Es exactamente igual que en una lista enlazada simple, solo que ahora puedo buscar el elemento buscado desde el comienzo y moviéndome con SIG o desde el final y moviéndome con ANT.

Si tengo una idea de por donde va a estar el elemento, empezare por donde sea mejor.

Procedimiento busqueda (com: puntero a doble nodo; final: puntero a doble nodo; elem: <tipo>; ent-sal lug: puntero a doble nodo)

Var

Ptr, lug: puntero a doble nodo

Inicio

Lug nil

Ptr final

Mientras (ptr <> nil) y (elemento > ptrinfo)

Ptr ptrant

Fin mientras

Si (ptr <> nil) y (elemento ptrinfo)

Entonces lug ptr

Fin si

Fin

Inserción en una lista doblemente enlazada:

Lo primero es ver si me queda espacio disponible en memoria dinámica, si me queda, reservo memoria para un nuevo elemento y meto la información que quiero en su campo de información, y lo siguiente es actualizar sus campos de enlace.

Casos particulares:

• Inserción al comienzo si la lista está vacía.

• Inserción al comienzo si la lista no está vacía.

• Inserción al final.

• Inserción en medio de la lista.

Procedimiento insercion (ent-sal com: puntero a nodo_doble; ent-sal final: puntero a

nodo_doble; elem: <tipo>)

var

lug, nuevo: puntero a nodo_doble

Inicio

si DISP = Nil

entonces escribir “No hay memoria”

sino nuevo DISP

DISP DISPSig

Nuevoinfo elem

Si com = nil

Entonces nuevosig NIL

Nuevoant NIL

Com nuevo

Final nuevo

Sino si elem < cominfo

Entonces nuevosig com

Nuevoant nil

Comant nuevo

Com nuevo

Sino lug comsig

Mientras (elem > luginfo) y (lug <> Nil)

Lug lugsig

Fin mientras

Si lug <> nil

Entonces nuevosig lug

Nuevoant lugant

Lugantsig nuevo

Lugant nuevo

Sino nuevosig nil

Nuevoant final

Finalsig nuevo

Final nuevo

Fin si

Fin si

Fin si

Fin si

Fin

Borrado en una lista doblemente enlazada:

Primero hay que ver si la lista tiene algún elemento, y si tiene algún elemento, habrá que buscar si el elemento que queremos buscar existe en la lista, y si existe, busco en que posición se encuentra.

Casos particulares:

• Borrado del primer nodo.

• Borrado del último nodo.

• Borrado de cualquier nodo.

Después de todo esto, habrá que liberar la memoria del nodo.

Procedimiento borrado (ent-sal com: puntero a nodo_doble; ent-sal final: puntero a

nodo_doble; elem: <tipo>)

var

lug: puntero a nodo_doble

inicio

si com = Nil

entonces escribir “Lista vacia”

sino lug com

mientras (luginfo <> elem) y (lug <> nil)

lug lugsig

fin mientras

si lug = Nil

entonces escribir “No encontrado”

sino si lug = com

entonces com comsig

si com = Nil

entonces final nil

sino comant nil

fin si

sino si lug <> final

entonces lugantsig lugsig

lugsigant lugant

sino lugantsig nil

final lugant

fin si

fin si

lugsig DISP

DISP lug

fin si

fin si

fin

7. PILAS:

Una pila es una estructura lineal de datos con la característica especial de que ahora, no podemos hacer las inserciones y las eliminaciones en cualquier lugar, sino que obligatoriamente las tenemos que hacer por un extremo de la lista. Ese extremo lo llamamos cima de la pila.

Esto supone que se procesen los elementos de la pila en orden inverso a su entrada en la estructura, es decir, el primer elemento de la pila que usare será el último que ha entrado (LIFO).

Con una pila podemos hacer dos operaciones básicas, PUSH (meter) y POP (sacar).

Aparte de estas dos funciones se pueden definir otras como la de pila vacía o top, que me dice cual es elemento que está en la cima de la pila pero sin sacarlo.

Se puede implementar con memoria estática (arrays) o con memoria dinámica (listas enlazadas).

Si utilizo un array, tendré que definir cual es el tamaño máximo del array, que será el de la pila, y aparte tendré definida una variable cima que tendrá en cada momento el índice que corresponde al elemento del array que está en la cima de la pila.

Pila = array [1..max_pila] de <info>

Cima: entero

Para señalar que la cima está vacía, cima es igual a 0 porque no tiene que apuntar a ningún elemento.

Implementación de una pila con memoria estática:

Algoritmo prin_pila

Const

Max_pila = <max_pila>

Var

P: array [1..max_pila] de <info>

C: entero

Elem: <info>

Inicio

C 0

Leer (elem)

Si pila_vacia (C) = verdadero

Entonces escribir “Pila vacia”

Sino sacar (pila,c,elem)

Escribir “Elemento sacado”elem

Fin si

Fin

Funcion pila_vacia (cima: entero): booleano

Inicio

Si cima = 0

Entonces retorno verdadero

Sino retorno falso

Fin si

Fin

Procedimiento meter (ent-sal pila: array[1..max_pila] de <info>; cima: entero;

elem:<info>)

Inicio

si cima = max_pila

entonces escribir “Pila llena”

sino cima cima + 1

pila[cima] elem

fin si

Fin

Funcion cima_pila (pila: array[1..max_pila] de <info>; cima: entero):<info>

Inicio

Retorno pila[cima]

Fin

Procedimiento sacar (ent-sal pila: array[1..max_pila] de <info>; cima: entero;

ent-sal e: <info>)

Inicio

E cima_pila (cima,pila)

Cima cima - 1

Fin

Implementación de una pila con memoria dinámica:

Tipo nodo: registro

Info: <tipo>

Sig: puntero a nodo

Fin registro

Algoritmo manejo_pila

Var

Cima: puntero a nodo

Elem: <tipo>

Inicio

Cima nil

Meter (cima,elem)

Si pila_vacia (cima)

Entonces escribir “No hay memoria”

Sino sacar (cima,elem)

Escribir “Elemento sacado”elem

Fin si

Fin

Funcion pila_vacia (cima: puntero a nodo): booleano

Inicio

Si cima = nil

Entonces retorno verdadero

Sino retorno falso

Fin si

Fin

Procedimiento poner (ent-sal cima: puntero a nodo; elem: <tipo>)

Var

Nuevo: puntero a nodo

Inicio

Si DISP = nil

Entonces escribir “No hay memoria”

Sino nuevo DISP

DISP DISPsig

Nuevoinfo elem

Nuevosig cima

Cima nuevo

Fin si

Fin

Funcion cima_pila (cima: puntero a nodo):<tipo>

Inicio

Retorno cimainfo

Fin

Procedimiento sacar (ent-sal cima: puntero a nodo; ent-sal elem: <tipo>)

Var

Borrado: puntero a nodo

Inicio

Elem cima_pila (cima)

Borrado cima

Cima cimasig

Borradosig DISP

DISP borrado

Fin

Aplicaciones de las pilas:

Un ejemplo típico de uso de pilas, es en las llamadas entre funciones. En este caso, el sistema operativo utiliza una pila en donde va guardando la dirección de retorno de cada una de estas llamadas.

8. COLAS:

Una cola también es una lista lineal de elementos, en la que las inserciones se hacen por un extremo de la lista, y los borrados por otro. Las inserciones se hacen por el final y los borrados por el principio.

Esto significa que es una estructura del tipo FIFO.

Sea cual sea la implementación, siempre tendrán que existir 2 variables, frente y final, que apunten al comienzo y al fin de la cola respectivamente.

Podemos implementar una cola con memoria estática (arrays) y con memoria dinámica (listas enlazadas).

Si implementamos la cola con arrays, tendremos un array llamado cola, que contiene el tipo de información que contiene la cola, y aparte dos valores, frente y final, cuyo valor servirá como el índice que indica que elemento está al frente y al final de la cola.

La cola estará vacía cuando frente y final no apunten a ningún índice del array, y esto será cuando frente y final valgan 0 si el array se empieza a numerar a partir del 1.

Aparte de la función que me dice si la cola está vacía, tendré que implementar funciones de sacar y meter un elemento.

Para insertar un elemento en una cola, habría que incrementar el valor en la variable final, y después introducir en la cola del final el elemento.

Para eliminar un elemento de una cola, bastaría primero ver que elemento está al frente de la cola, y para eliminarlo aumentar el frente en una unidad.

Si solo consideramos esta posibilidad, es decir, manejar el array solo incrementando, no lo estaríamos utilizando eficientemente, porque podríamos llegar al caso en que habiendo posiciones libres al comienzo del array no pudiésemos usarlas cuando el final alcanzase el máximo índice del array.

Para evitar esto, el array que implementa la cola, lo vamos a tratar como un array circular (suponemos que despues de la posición N del array, viene la posición 1). Esto quiere decir que si la cola no está llena, después de final = Max, viene final = 1, y al sacar el elemento de la cola, si no está vacía, después de frente = N, vendrá frente = 1, y si después de sacar el elemento la cola queda vacía, actualizaremos frente y final a 0.

Si frente es igual a final y son distintos de 0 antes de sacar un elemento, quiere decir que ese elemento es el último.

Antes de insertar un elemento, tendré que ver si la cola está llena (frente = 1 y final = Max o frente = final + 1).

Implementación de colas con memoria estática:

Tipo datos: array [1..max_cola] de <tipo>

Algoritmo manejo_cola

Var

Cola: datos

Frente, final: entero

Elem, result: <tipo>

Inicio

Frente 0

Final 0

Meter_cola (frente,final,cola,elem)

Si cola_vacia (frente,final) = verdadero

Entonces escribir “Cola vacía”

Sino sacar_cola (frente,final,cola,result)

Escribir “Elemento sacado”result

Fin si

Fin

Funcion cola_vacia (frente: entero; final: entero): boolean

Inicio

Si (frente = 0) y (final = 0)

Entonces retorno verdadero

Sino retorno falso

Fin si

Fin

Procedimiento meter_cola (ent-sal cola:datos; ent-sal frente:entero; ent-sal final:entero;

Elem: <tipo>)

Inicio

Si ((frente = 1) y (final = Max_cola)) o frente = final + 1

Entonces escribir “Cola llena”

Sino si cola_vacia (frente,final) = verdadero

Entonces frente 1

Final 1

Sino si final = Max_cola

Entonces final 1

Sino final final + 1

Fin si

Fin si

Cola[final] elem

Fin si

Fin

Procedimiento sacar_cola (ent-sal cola:datos; ent-sal frente:entero; ent-sal final:entero;

Elem: <tipo>)

Inicio

Elem cola[frente]

Si frente = final

Entonces frente 0

Final 0

Sino si frente = Max_cola

Entonces frente 1

Sino frente frente + 1

Fin si

Fin si

Fin

Implementación de colas con memoria dinámica:

Funcion cola_vacia (com: puntero a nodo_doble): booleano

Inicio

Si com = nil

Entonces retorno verdadero

Sino retorno falso

Fin si

Fin

Procedimiento meter_cola (ent-sal com: puntero a nodo_doble;

ent-sal final: puntero a nodo_doble; elem: <tipo>)

var

nuevo: puntero a nodo_doble

Inicio

Si DISP = nil

Entonces escribir “No hay memoria”

Sino nuevo DISP

DISP DISPsig

Nuevoinfo elem

Nuevoant final

Nuevosig nil

Finalsig nuevo

Final nuevo

Si cola_vacia (frente) = verdadero

Entonces frente nuevo

Fin si

Fin si

Fin

Procedimiento sacar_cola (ent-sal com: puntero a nodo_doble;

ent-sal final: puntero a nodo_doble; result: <tipo>)

var

ptr: puntero a nodo_doble

Inicio

Result cominfo

Ptr com

Com comsig

Si com = nil

Entonces final nil

Sino comant nil

Fin si

Ptrsig DISP

DISP ptr

Fin

Aplicaciones de las colas:

Las colas se suelen utilizar en los procesos por lotes y en la utilización de recursos del sistema.

Cuando un proceso quiere usar un recurso y otro lo está usando, tendrá que ponerse en la cola, y se irá asignando el recurso según el orden en que se ha pedido.

A veces, la utilización de recursos por parte de los procesos, nos interesa que ciertos procesos tengan mayor prioridad que otros, incluso aunque lleguen más tarde, y para ello utilizaríamos las colas de prioridades.

Cada elemento de la cola, tendrá otro campo que indique su prioridad, tal que a la hora de sacar un elemento de la cola, saco el del frente, y a la hora de insertar un elemento en la cola, tendré en cuenta la prioridad del elemento que quiero insertar, y para ello se inserta en la cola por orden de prioridad, y si hay mas elementos que tienen la misma prioridad que el que queremos insertar, los procesamos según su orden de llegada, es decir, que lo colocamos como el último de los elementos con esa prioridad.

DOBLES COLAS O BICOLAS:

Una bicola es una lista lineal de elementos en la que las inserciones y borrados es pueden hacer por cualquiera de sus extremos.

Va a haber 2 variables, izquierda y derecha, que apuntan a sus extremos.

Hay 2 tipos especiales de bicolas:

• De entrada restringida: Que permite inserciones solo por un extremo y borrados por los dos.

• De salida restringida: Que permite inserciones por cualquier extremo y borrado solo por uno.

Se pueden implementar con memoria estática o dinámica.

EJERCICIOS: TEMA 11

Diseñar un algoritmo que coloque el primer nodo de una lista enlazada como penúltimo, pero cambiando solo los campos enlace. La lista es una lista enlazada doble.

Procedimiento resultado (ent-sal com: ptr_a nodo; ent-sal final: ptr_a nodo)

Var

Prin: puntero a nodo

Inicio

Si (com = final) o (comsig = final)

Entonces escribir “No se puede hacer el cambio”

Sino prin com

Comsig final

Comant finalant

Finalantsig com

Finalant com

Com prinsig

Comant nil

Fin si

Fin

Dada una cadena de caracteres C1, en un array de longitud máxima N, y con el fin de cadena `$', y dada otra cadena C2 almacenada en una lista enlazada simple, que cada nodo de la lista contiene una letra. Se trata de que pasandole a un subprograma 2 cadenas, determinar cuantas veces aparece C1 en C2.

Funcion compara (c1: cadena; c2: ptr_a nodo): entero

Var

Ini,p: puntero a nodo

I,res: entero

Inicio

Res 0

P C2

Mientras (p<> nil)

Si (pinfo = c1[i])

Entonces ini P

I 1

Mientras (pinfo = c1[i]) y (c1[i] <> `$') y (p <> nil)

I i + 1

P psig

Fin mientras

Si c1[i] = `$'

Entonces res res + 1

Sino p inisig

Fin si

Sino p psing

Fin si

Fin mientras

Fin

Dada una lista doblemente enlazada que contiene en cada nodo un dígito decimal (0..9), determinar el valor que se obtiene si consideramos la información de cada nodo de la lista como los términos de un polinomio, donde el término de menor grado es el último nodo y el de máximo grado es el del comienzo, evaluando el polinomio para un valor que se le pasa como parámetro.

Funcion pot (base: entero; exp: entero): real

Var

I: entero

Acum: real

Inicio

Acum 1

Desde i = 1 hasta exp

Acum acum * base

Fin desde

Retorno acum

Fin

Funcion polinomio (fin: ptr_a nodo_doble; x: entero): real

Var

Res: real

P: puntero a nodo_doble

Inicio

Exp 0

Res 0

P final

Mientras p <> nil

Res res + (cinfo * pot (x,exp)

P pant

Exp exp + 1

Fin mientras

Retorno res

Fin

Tenemos almacenado en un fichero de productos el stock de cada uno de ellos en el almacén. Cada registro tiene identificador, nombre, stock actual y stock mínimo. Iterativamente, hasta que se introduzca un identificador de producto igual a 0, se irán haciendo pedidos o entregas pidiéndonos el identificador, la cantidad y si es pedido o entrega, y con ellos iremos actualizando la cantidad de productos en almacén. Al final quiero tener el fichero actualizado. Para ello, utilizaremos una lista enlazada como estructura auxiliar.

Tipo producto: registro

Indentificador: entero

Nombre: cadena

Stock_act: entero

Stock_min: entero

Fin registro

Nodo: registro

Info: producto

Sig: puntero a nodo

Fin registro

Var

Com, ptr: puntero a nodo

Reg: producto

Fich: fichero de producto

Id,cant: entero

Car: carácter

Inicio

Com nil

Abrir (fich,”datos.dat”,entrada)

Leer (fich,reg)

Mientras no eof (fich)

Insertar (com,reg)

Leer (fich,reg)

Fin mientras

Cerrar (fich)

Escribir “Identificador”

Leer (id)

Mientras id <> 0

Escribir “Cantidad”

Leer cant

Escribir “Pedido/Entrega”

Leer car

Modifica (com,id,cant,car)

Escribir “Identificador”

Leer id

Fin mientras

Abrir (fich,”datos.dat”,salida)

Ptr com

Mientras com <> nil

Escribir (fich,cominfo)

Com comsig

Ptrsig DISP

DISP ptr

Ptr com

Fin mientras

Cerrar (fich)

Fin

Procedimiento insertar (ent-sal com: puntero a nodo; elem: producto)

Var

Lug,lugp,nuevo: puntero a nodo

Inicio

Si DISP = Nil

Entonces escribir “No hay memoria”

Sino nuevo DISP

DISP DISPSig

Nuevoinfo elem

Si com = nil

Entonces nuevosig com

Com nuevo

Sino lugp com

Lug comsig

Mientras (elem.identificador > luginfo) y (lug <> nil)

Lugp lug

Lug lugsig

Fin mientras

Nuevosig lug

Lugpsig nuevo

Fin si

Fin si

Fin

Procedimiento modifica (prim: ptr_a nodo; d: entero; c: entero; caract: carácter)

Var

Ptr: puntero a nodo

Inicio

Si prin = nil

Entonces escribir “Lista vacia”

Sino ptr prin

Mientras (ptr <> nil) y (id <> ptrinfo.identificador)

Ptr ptrsig

Fin mientras

Si ptr = nil

Entonces escribir “El producto no existe”

Sino si (caract = `P') o (caract = `p')

Entonces ptrinfo.cantidad ptrinfo.cantidad + c

Sino si ptrinfo.cantidad >= c

Entonces ptrinfo.cantidad ptrinfo.cantidad - c

Sino escribir “No hay cantidad suficiente”

Fin si

Fin si

Fin si

Fin si

Fin

Dadas 2 listas enlazadas simples, L1 y L2, ordenadas en ascendente, actualizar las 2 listas de modo que L2 quede vacía y L1 contenga a todos los elementos de L2, menos a los repetidos. No borrar elementos, hay que enlazarlos.

Procedimiento juntar (ent-sal com1: ptr_a nodo; ent-sal com2: ptr_a nodo)

Var

P1,a1, aux, borrado: puntero a nodo

Inicio

Si com2 <> nil

Entonces si com1 = nil

Entonces com1 com2

Sino si (com2info < com1info) y (com2 <> nil)

Entonces aux com2

Com2 com2sig

Auxsig com1

Com1 aux

Sino a1 com1

P1 com1sig

Mientras (p1 <> nil) y (com2 <> nil)

Si (com2info < p1info)

Entonces a1 p1

P1 p1sig

Sino si (com2info = p1info)

Entonces borrado com2

Com2 com2sig

Borradosig DISP

DISP borrado

Sino aux com2

A1sig com2

Com2sig P1

Com2 auxsig

A1 a1sig

Fin si

Fin si

Fin mientas

Si com2 <> nil

Entonces a1sig com2

Com2 nil

Fin si

Fin si

Fin si

Fin si

Fin

Implementar una cola usando listas enlazadas simples:

Procedimiento meter (ent-sal com: ptr_a nodo; ent-sal final: ptr_a nodo; e: <tipo>)

Var

Nuevo: ptr_a nodo

Inicio

Si DISP = nil

Entonces escribir “No hay memoria”

Sino nuevo DISP

DISP DISPsig

Nuevosig Nil

Si com = nil

Entonces com nuevo

Final nuevo

Sino finalsig nuevo

Final nuevo

Fin si

Fin si

Fin

Procedimiento sacar (ent-sal com:ptr_a nodo; ent-sal final:ptr_a nodo; ent-sal e:<tipo>)

Var

Borrado: puntero a nodo

Inicio

E cominfo

Borrado com

Com comsig

Si com = nil

Entonces final nil

Fin si

Borradosig DISP

DISP borrado

Fin

Implementar una cola de prioridades con listas enlazadas simples:

Procedimiento meter (ent-sal com: ptr_a nodo; e: <tipo>; p: entero)

Var

Lugp, lug, nuevo: puntero a nodo

Inicio

Si DISP = nil

Entonces escribir “No hay memoria”

Sino nuevo DISP

DISP DISPsig

Nuevoinfo e

Nuevoprioridad p

Lugp nil

Lug com

Mientras (lug <> nil) y (p >= lugprior)

Lugp lug

Lug lugsig

Fin mientras

Si lugp = nil

Entonces nuevosig com

Com nuevo

Sino lugpsig nuevo

Nuevosig lug

Fin si

Fin si

Fin

Procedimiento sacar (ent-sal com:ptr_a nodo; ent-sal e:<tipo>)

Var

Borrado: puntero a nodo

Inicio

E cominfo

Borrado com

Com comsig

Borradosig DISP

DISP borrado

Fin

Implementar una cola de prioridades como lista de listas:

Tipo nodo_prior: registro

Prior: entero

Prinp: ptr_a nodo_info

Sig: ptr_a nodo_pr

Fin registro

Nodo_info: registro

Info: <tipo>

Enl: ptr_a nodo_info

Fin registro

Procedimiento meter (ent-sal com:ptr_a nodo_prior; elem:<tipo>; p: entero)

Var

Nuevoi, lugi: puntero a nodo_info

Nuevop, ptr, ptra: puntero a nodo_prior

Inicio

Si (DISPP = nil) y (DISPI = nil)

Entonces escribir “No hay memoria”

Sino nuevoi DISPI

DISPI DISPIenl

Nuevoiinfo elem

Nuevosig NIL

Ptra nil

Ptr com

Mientras (ptr <> nil) y (p > ptrprior)

Ptra ptr

Ptr ptrsig

Fin mientras

Si (p = ptrprior)

Entonces lugi ptrprinp

Mientras (lugisig <> nil)

Lugi lugienl

Fin mientas

Lugisig nuevo

Sino nuevop DISPP

DISPP DISPPsig

Nuevopprior p

Nuevopsig ptr

Nuevopprinp nuevoi

Si (ptra = nil)

Entonces com nuevop

Sino ptrasig nuevop

Fin si

Fin si

Fin si

Fin

Procedimiento sacar (ent-sal com: ptr_a nodo_prior; ent-sal e:<tipo>)

Var

Bori: ptr_a nodo_info

Borp: ptr_a nodo_prior

Inicio

E comprinpinfo

Bori comprinp

Comprinp comprinpenl

Borienl DISPI

Si comprinp = nil

Entonces borp com

Com comsig

Borpsig DISPP

DISPP borp

Fin si

Fin

ÁRBOLES Y GRAFOS:

ESTRUCTURAS DE DATOS NO LINEALES:

TEMA 12

Árboles.

Árboles binarios.

Árboles binarios de búsqueda.

Aplicaciones de los árboles binarios.

Grafos.

Operaciones con grafos.

Aplicaciones de los grafos.

ÁRBOLES:

Los árboles están dentro de las estructuras de datos no lineales, que consisten en que desde un nodo tengo acceso a varios elementos.

Un árbol es un conjunto finito de elementos llamados nodos, que guardan entre sí una relación jerárquica tal que siempre va a existir un nodo raíz diferenciado del resto, y los restantes parten de él, formando conjuntos disjuntos cada uno de los cuales es a su vez otro árbol. A cada uno de esos árboles se les llama subárboles del raíz.

Un árbol vacío es aquel que no tiene ningún nodo (Raiz = NIL).

A B F L

C D E G H I J K

Terminología de los árboles:

• Raíz: Nodo esencial de que parten todos los demás. Es el único que no tiene antecesor.

• Nodo: Cada uno de los elementos del árbol.

• Hoja o nodo terminal: Nodo que no tiene ningún otro subárbol debajo de él.

• Hijo: Cada nodo que no es hoja tiene debajo de él a otros subárboles.

• Padre: Todo nodo excepto el raíz, que tiene asociado un predecesor del que desciende.

• Hermano: Relación entre los nodos hijos del mismo padre.

• Nodo interno: El que tiene algún hijo.

• Nivel: Cada nodo de un árbol tiene asociado un número de nivel. El del raíz es el 0, y a partir de ahí se va aumentando de 1 en 1.

• Camino entre A y B: Sucesión de enlaces o nodos por los que hay que pasar para llegar de A a B.

• Rama: Camino que termina en una hoja.

• Profundidad de un árbol: Es el número máximo de nodos de la rama más larga del árbol. Equivale al número máximo de niveles + 1.

• Peso: Número de hojas que tiene un árbol.

• Bosque: Colección de 2 o más árboles.

2. ÁRBOLES BINARIOS:

Son un conjunto finito de elementos llamados nodos que contienen un nodo raíz y donde cada nodo puede tener 0,1, ó 2 hijos. A cada subarbol se le denomina subarbol izquierdo y subarbol derecho.

Terminología:

• Dos árboles binarios son similares si tienen los nodos colocados igual.

• Árboles binarios equivalentes o copias: Tienen la misma estructura y los mismos contenidos.

• Árboles binarios equilibrados: Aquellos que en la altura entre su árbol izquierdo y derecho se diferencian como máximo en una unidad.

• Árboles binarios completos: Aquellos en que cada nodo del árbol tiene 0 ó 2 hijos, el número máximo de hijos de un determinado nivel i será 2 elevado a i.

• Árbol lleno: Cuando todos los niveles están completos.

Representación de árboles binarios:

Se pueden representar con memoria estática o dinámica. Con memoria dinámica la estructura de un nodo va a tener el campo info y otros 2 nodos que referéncien al hijo izquierdo y derecho de cada nodo.

Representación de árboles binarios con punteros:

Cada nodo va a tener un registro que contiene el campo de información y 2 campos de tipo puntero.

INFO

IZQ DER

Tipo nodo_arbol: registro

Info: <tipo>

Izq,der: ptr_a nodo_arbol

Fin registro

A parte de los nodos, los árboles tienen una variable especial llamada raíz, que es de tipo puntero a nodo_arbol y apunta al nodo que está al comienzo del árbol.

Raiz

DISP_AR va a ser una lista enlazada simple en la que las inserciones y borrados los hacemos por el comienzo y como campo de enlace vamos a usar el nodo izquierdo.

Recorrido de los árboles binarios:

Es pasar por todos sus nodos. Para recorrer un árbol lo podemos hacer de 3 formas, según el momento en el que procesemos el nodo raíz. Las 3 formas se llaman : Preorden, Inorden, Posorden.

En cualquiera de las tres, siempre se recorre primero el subárbol izquierdo, y luego el derecho, y se diferencian en el momento en el que recorremos el raíz.

• Preorden: La raíz se procesa primero, luego el izquierdo y luego el derecho.

• Inorden: Primero la raíz, luego el izquierdo y luego el derecho.

• Posorden: Primero el izquierdo, luego el derecho y luego la raíz.

Preorden: A, B, D, E, G, C, F

Inorden: D, B, E, G, A, F, C

Posorden: D, G, E, B, F, C, A

- Recorrido de un árbol binario:

Los arboles son estructuras recursivas, por lo que los algoritmos más eficientes con árboles son los recursivos.

Procedimiento preorden (raiz: ptr_a nodo_ar)

Inicio

Si raiz <> nil

Entonces {procesar raizinfo)

Preorden (raizizq)

Preorden (raizder)

Fin si

Fin

Procedimiento inorden (raiz: ptr_a nodo_ar)

Inicio

Si raiz <> nil

Entonces inorden (raizizq)

{procesar raizinfo)

inorden (raizder)

Fin si

Fin

Procedimiento posorden (raiz: ptr_a nodo_ar)

Inicio

Si raiz <> nil

Entonces posorden (raizizq)

Posorden (raizder)

{procesar raizinfo)

Fin si

Fin

También se puede recorrer un árbol binario con un algoritmo no recursivo:

Algoritmo inorden

Var

Pila: array[1..Max] de puntero a nodo_ar

Cima: entero

Raiz, ptr: puntero a nodo_ar

Inicio

Cima 1

Pila[cima] Nil

Ptr raiz

Mientras (ptr <> nil)

Cima cima + 1

Pila[cima] ptr

Ptr ptrizq

Fin mientras

Ptr pila[cima]

Cima cima-1

Mientras (ptr <> nil)

{procesar ptrinfo}

si ptrder <> nil

entonces ptr ptrder

mientras ptr <> nil

cima cima + 1

pila[cima] ptr

ptr ptrizq

fin mientras

fin si

ptr pila[cima]

cima cima - 1

fin mientras

Fin

3. ÁRBOLES BINARIOS DE BÚSQUEDA:

Son un tipo especial de árboles binarios que se caracteriza porque los elementos del árbol son todos distintos y además están colocados de tal manera que el recorrido en Inorden de ese árbol da lugar a que los elementos se procesen ordenados según un determinado campo de información, para ello es necesario que todos los nodos del árbol cumplan la siguiente regla: Que todo lo que está a la izquierda de un nodo tenga un valor menor que el resto del nodo, y todo lo que esta a la derecha tenga un valor mayor.

25 18 35

12 22 30 38

11 15 21 32 37 40

14 16

Recorrido inorden: 11,12,14,15,16,18,21,22,25,30,32,35,37,38,40.

- Búsqueda de un elemento:

Dado un elemento, mirar si se encuentra o no en el árbol, voy a devolver un puntero a ese elemento y a su padre.

Procedimiento buscar (raiz: ptr_a nodo_ar; ent-sal act: ptr_a nodo_ar;

ent-sal pad: ptr_a nodo_ar; e:<tipo>)

Inicio

Pad Nil

Act raiz

Mientras (act <> nil) y (actinfo <> e)

Pad act

Si (e < actinfo)

Entonces act actizq

Sino act actder

Fin si

Fin mientras

Si act <> nil

Entonces escribir “Elemento encontrado”

Sino escribir “Elemento no encontrado”

Fin si

Fin

- Inserción en un árbol binario:

Primero hay que ver que no haya otro elemento igual en el árbol, y después habrá que colocar el elemento a la izquierda de su padre si es menor que él o al derecha si es mayor.

Algoritmo no recursivo:

Procedimiento insercion (ent-sal raiz: ptr_a nodo_ar; elem:<tipo>)

Var

Ptr,pad,nuevo: ptr_a nodo_ar

Inicio

Buscar (raiz,ptr,pad,elem)

Si ptr <> nil

Entonces escribir “El elemento ya existe”

Sino si DISP = Nil

Entonces escribir “No hay memoria”

Sino nuevo DISP

DISP DISPIZQ

Nuevoinfo elem

Nuevoizq nil

Nuevoder nil

Si PAD = nil

Entonces raiz nuevo

Sino si elem < padinfo

Entonces padizq nuevo

sino Padder nuevo

fin si

fin si

fin si

fin si

Fin

Algoritmo recursivo:

Procedimiento insercion (ent-sal ptr: ptr_a nodo_ar; elem:<tipo>)

Inicio

Si ptr <> nil

Entonces si elem < ptrinfo

Entonces insercion (ptrizq,elem)

Sino si elem > ptrinfo

Entonces insercion (ptrder,elem)

Sino escribir “El elemento ya existe”

Fin si

Fin si

Sino ptr DISP

DISP DISPizq

Ptrinfo elem

Ptrizq nil

Ptrder nil

Fin si

Fin

- Borrado en un árbol binario:

Si el nodo a borrar sólo tiene un hijo, lo sustituimos por ese y ya se acabo. Pero si el nodo a borrar tiene 2 hijos, hay que buscar cual es el sucesor de ese nodo (estará a la derecha del más a la izquierda) y el padre de ese sucesor. Sustituir el nodo a borrar por su sucesor. Al final hay que poner como hijos del sucesor (que es el que ha sustituido al nodo borrado) a los hijos del nodo borrado.

- Algoritmo no recursivo:

Procedimiento borrar (ent-sal raiz: ptr_a nodo_ar; elem:<tipo>)

Var

Ptr, pad: ptr_a nodo_ar

Inicio

Buscar (raiz,ptr,pad,elem)

Si ptr = nil

Entonces escribir “El elemento no existe”

Sino si (ptrizq <> nil) y (ptrder <> nil)

Entonces borrar_2_h (raiz,ptr,pad)

Sino borrar_01_h (raiz,ptr,pad)

Fin si

Ptrizq DISP

DISPizq ptr

Fin si

Fin

Procedimiento borrar_2_h (ent-sal raiz: ptr_a nodo_ar; ent-sal: ptr_a nodo_ar;

pad: ptr_a nodo_ar)

Var

Suc,padsuc,hijosuc: ptr_a nodo_ar

Inicio

Padsuc ptr

Suc ptrder

Mientras sucizq <> nil

Padsuc suc

Suc sucizq

Fin mientras

Hijosuc sucder

Si padsucizq = suc

Entonces padsucizq hijosuc

Sino padsucder hijosuc

Fin si

Si pad = nil

Entonces raiz suc

Sino si padizq = ptr

Entonces padizq suc

Sino padder suc

Fin si

Fin si

Sucizq ptrizq

Sucder ptrder

Fin

Procedimiento borrar_01_h (ent-sal raiz: ptr_a nodo_ar; ent-sal ptr: ptr_a nodo_ar;

Pad: ptr_a nodo_ar)

Var

Hijo: ptr_a nodo_ar

Inicio

Si ptrizq <> nil

Entonces hijo ptrizq

Sino hijo ptrder

Fin si

Si pad = nil

Entonces raiz hijo

Sino si ptr = padizq

Entonces padizq hijo

Sino padder hijo

Fin si

Fin si

Fin

- Algoritmo recursivo:

Procedimiento borrar (ptr: ptr_a nodo_ar; elem:<tipo>)

Inicio

Si ptr <> nil

Entonces si elem < ptrizq

Entonces borrar (ptrizq, elem)

Sino si elem > ptrder

Entonces borrar (ptrder, elem)

Sino si ptrizq = Nil

Entonces ptr ptrizq

Sino si ptrder = Nil

Entonces ptr ptrizq

Sino eliminar (ptrder, ptr)

Fin si

Fin si

Fin si

Ptrizq DISP

DISP ptr

Fin si

Sino escribir “El nodo no existe”

Fin si

Fin

Procedimiento eliminar (ent-sal suc: ptr_a nodo_ar; ent-sal ptr: ptr_a nodo_ar)

Inicio

Si sucizq <> nil

Entonces eliminar (sucizq, ptr)

Sino ptrinfo sucinfo

Ptr suc

Fin si

Fin

4. APLICACIONES DE LOS ÁRBOLES BINARIOS:

• Una de las aplicaciones más importantes es dentro de la inteligencia artificial, y más concretamente en el área de reconocimiento de patrones.

Se trata de utilizar los árboles para realizar clasificaciones. La clave está en asignar a cada nodo del árbol un significado y a cada rama, una respuesta que nos ayude a determinar el sentido de la búsqueda.

• Transformación de una notación algebraica a otra: Prefija, infija, posfija (+ab,a+b,ab+). Para ello la raíz del árbol debe de ser un signo y para las ramas o subárboles, otra expresión o un operando.

• Para implementar el algoritmo de Hodman de compresión y codificación.

5. GRAFOS:

El grafo es una estructura de datos no lineal, tal que ahora desde un nodo podemos apuntar a varios, pero a su vez un nodo puede ser apuntado desde otros.

Terminología de los grafos:

Un grafo se compone por un conjunto V de vértices y un conjunto A de aristas. Cada arista se identifica con un par de vértices que indican los vértices a los que une la arista. Los vértices de una arista son entre sí nodos adyacentes.

• Grado de un nodo: Número de aristas que contiene a ese nodo.

• Grado de un grafo: Número de vértices de ese grafo. Si el grado de un nodo es 0, se dice que es un nodo aislado.

• Camino: Un camino C de longitud N de un nodo V1 a un nodo V2, se define como la secuencia de nodos por los que hay que pasar para llegar del nodo V1 a V2. La longitud de ese camino es el número de aristas que comprende ese camino.

El camino es cerrado si empieza y termina en el mismo nodo. El camino es simple si todos los nodos de dicho camino son distintos a excepción de los de los extremos que pueden ser iguales.

2

1 3 C (1,6)

4 1,4,6 Caminos simples

6 1,4,5,6

5 1,4,3,4,5,6

Aristas especiales:

• Bucles: Es una arista cuyos extremos son idénticos.

• Arista múltiple: Dos o más aristas que conectan los mismos nodos.

Tipos de grafos:

• Grafo conectado o conexo: Existe un camino simple entre 2 cualesquiera de sus nodos.

• Grafo desconectado: Aquel en que existen nodos que no están unidos por ningún camino.

• Grafo dirigido: Cada arista tiene asignada una dirección (identificada por un par ordenado).

• Grafo no dirigido: La arista está definida por un par no ordenado.

• Grafo sencillo: Aquel que no tiene ni bucles ni aristas múltiples.

• Grafo múltiple o multigrafo: Permite la existencia de aristas múltiples o bucles.

• Grafo completo: Cada nodo del grafo es adyacente a todos los demás.

• Grafo etiquetado con peso ponderado: Aquel en el que a cada arista del grafo va asociado un valor que es lo que llamamos peso de la lista. Se usa para indicar algo, como la longitud de la arista o la importancia de la arista, ...

• Peso de un camino: La suma de los pesos de las aristas del camino.

Representación de los grafos:

Hay 2 formas de representar los grafos, con memoria estática y con memoria dinámica:

Con memoria estática:

• Matriz de adyacencia: Es una matriz M de N*N elementos donde N es el número de nodos del grafo, donde cada posición M(i,j) índica si hay una conexión o no entre el nodo que aparece asociado a la posición I de la matriz y el nodo que aparece asociado a la matriz J.

Si lo que quiero es representar un grafo ponderado en vez de poner 0 y 1, pondremos 0 si no esta conectado y el valor de la arista si existe conexión.

Si el grafo no es dirigido resulta una matriz simetrica.

Las potencias de la matriz de adyacencia M elevado a K nos indican en las posiciones que tiene valor 1 que existe un camino de longitud K entre los nodos asociados a las posiciones I, J de esa matriz.

Destino

	1	2	3	4	5	6
1	0	0	0	1	0	0
2	0	0	0	0	0	0
3	1	1	0	1	0	0
4	0	0	0	0	0	0
5	0	0	0	1	1	1
6	0	0	0	0	0	0

Origen

2

3

1

4

5

6

Con memoria dinámica:

Vamos a utilizar 2 listas enlazadas, una es la lista de nodos (formada por todos los vértices y aristas del grafo.

Cada nodo de esa lista tendrá la siguiente información:

• Info: Información del nodo.

• Sig: Puntero que enlaza con el siguiente nodo de la lista de nodos.

• Ady: Apunta al primer elemento de la lista de adyacencia.

La lista de adyacencia contiene o enlaza a todas las aristas que parten de ese nodo. El conjunto de todas las listas de adyacencia, forman una lista de listas.

La lista de adyacencia se implementa como otra lista enlazada en la que cada nodo de esa lista contiene 2 campos:

• Des (destino): Es un campo puntero al nodo destino de la lista.

• Enl (enlace): Es un campo puntero que apunta al siguiente nodo o arista de la lista de adyacencia de ese nodo.

1

1

Sig Ady Des Enl

2

2

3

4

3

4

Tipo vertice: registro

Info: <tipo>

Sig: ptr_a vertice

Ady: ptr_a arista

Fin registro

Tipo arista

Des: ptr_a vertice

Enl: ptr_a arista

(* El peso de la arista iría aquí *)

Fin registro

Para manejar la memoria disponible vamos a tener 2 listas:

• ADISP: Apunta al primer nodo que enlaza a los nodos de tipo arista disponible.

• NDISP: Apunta la primer nodo que enlaza a los nodos de tipo vértices. Nos movemos con el campo sig.

6. OPERACIONES CON GRAFOS:

- Búsqueda de un nodo:

Lo que se trata es de localizar un nodo que contiene una determinada información, para ello le pasamos la información al procedimiento y nos devuelve la posición si lo encuentra o Nil si no lo encuentra.

Procedimiento Buscar_nodo (elem:<tipo>;ent-sal ptr:ptr_a vertice; prin: ptr_a vertice)

Inicio

Ptr prin

Mientras (ptrinfo <> elem) y (ptr <> nil)

Ptr ptrsig

Fin mientras

Fin

- Búsqueda de una arista:

Se trata de buscar una arista dados sus campos de información origen y destino. Devuelve un puntero a la lista de aristas que apunta a esa arista o Nil si no existe.

Procedimiento buscar_arista (prin: ptr_a veritice; orig:<tipo>; des:<tipo>;

ent-sal ptr: ptr_a arista; ent-sal p1: ptr_a vertice;

ent-sal p2: ptr_a vertice)

Inicio

Buscar_nodo (prin,orig,p1)

Si p1 = nil

Entonces escribir “No existe el nodo origen”

Sino buscar_nodo (prin,des,p2)

Si p2 = nil

Entonces escribir “No existe el nodo destino”

Sino ptr p1ady

Mientras (ptr <> nil) y (ptrdes <> p2)

Ptr ptrenl

Fin mientras

Fin si

Fin si

Fin

- Inserción de un nodo:

Primero debemos mirar si no existe un nodo que contenga esa información y para insertar el nodo lo insertamos por el principio.

Procedimiento insertar_nodo (ent-sal prin: ptr_a vertice; elem: <tipo>

Var

Nuevo: ptr_a vertice;

Inicio

Si NDISP = Nil

Entonces escribir “No hay memoria”

Sino nuevo NDISP

NDISP NDISPSig

Nuevoinfo elem

Nuevoady Nil

Nuevosig prin

Prin nuevo

Fin si

Fin

- Inserción de una arista:

Primero hay que comprobar si existen los nodos origen y destino, luego hay que comprobar que no existe una arista igual en esa dirección y para insertarla, como el orden no importa se inserta por el principio.

Procedimiento insertar_arista (prin: ptr_a vertice; orig:<tipo>; dest:<tipo>;

ent-sal p1: ptr_a vertice; ent-sal p2: ptr_a vertice)

Var

Nuevo, pa: ptr_a arista

Inicio

Si ADISP = Nil

Entonces escribir “No hay memoria”

Sino buscar_arista (prin,orig,des,pa,p1,p2)

Si pa <> nil

Entonces escribir “La arista ya existe”

Sino Nuevo ADISP

ADISP ADISPSig

Nuevodest p2

Nuevoenl p1ady

P1ady nuevo

Fin si

Fin si

Fin

- Borrado de una arista:

Procedimiento borrar_arista (prin: ptr_a vertice; orig:<tipo>; des:<tipo>;

p1: ptr_a vertice; p2: ptr_a vertice)

Var

Act, ant, pa: ptr_a arista

Inicio

Buscar_arista (prim,or,dest,pa,p1,p2)

Si pa = nil

Entonces escribir “La arista ya existe”

Sino ant nil

Act p1ady

Mientras (actdest <> p2) y (act <> nil)

Ant act

Act actenl

Fin mientras

Antenl actenl

Si ant = nil

Entonces p1ady p1adyenl

Sino antenl actenl

Fin si

Actenl ADISP

ADISP act

Fin si

Fin

- Borrado de un nodo:

Primero hay que comprobar si existe el nodo y después se borran todas sus aristas.

Procedimiento borrar_nodo (ent-sal prin: ptr_a vertice; info:<tipo>)

Var

Ptr, p1, p2, act, ant: ptr_a vertice

Pa, borrado: ptr_a arista

Inicio

Borrar_nodo (prin,elem,ptr)

Si ptr = nil

Entonces escribir “No existe el nodo a borrar”

Sino act prin

Mientras act <> nil

Borrar_arista (prin,actinfo,elem)

Act actsig

Fin mientras

Actenl ADISP

ADISP ptrady SOLO EN PSEUDOCÓDIGO

Ptrady Nil

Borrado ptrady

Mientras borrado <> nil

Borrar_arista (prin,elem,borradodestinoinfo) EN CUALQUIER

Borrado borradoenl LENGUAJE

Fin mientras

Antnil

Actprin

Mientras (act <> nil) y (actinfo <> elem)

Ant ant

Act actsig

Fin mientras

Si ant = nil

Entonces prin prinsig

Sino antsig actsig

Fin si

Actsig NDISP

NDISP act

Fin si

Fin

7. APLICACIONES DE LOS GRAFOS:

• Se pueden representar transformaciones de estado con los grafos.

• Sirven en diversos campos de investigación para encontrar el método más corto y que cueste lo menos posible.

• Para el álgebra se utiliza la matriz de adyacencia.

EJERCICIOS: TEMA 12

En un árbol binario de búsqueda, dar todos los elementos inferiores a uno dado con información elem.

Procedimiento buscar (raiz: ptr_a nodo_ar; ent-sal ptr: ptr_a nodo_ar; elem: <tipo>)

Inicio

Ptr raiz

Mientras (ptrinfo <> elem) y (ptr <> nil)

Si ptrinfo > elem

Entonces ptr ptrder

Sino ptr ptrizq

Fin si

Fin mientras

Fin

Procedimiento inorden (ptr: ptr_a nodo_ar)

Inicio

Si ptr <> nil

Entonces inorden (ptrizq)

Escribir (ptrinfo)

Inorden (ptrder)

Fin si

Fin

Procedimiento inferiores (raiz: ptr_a nodo_ar; elem: <tipo>)

Var

Ptr: ptr_a nodo_ar

Inicio

Buscar (raiz,ptr,elem)

Si ptr = nil

Entonces escribir “El elemento no existe”

Sino inorden (ptrizq)

Fin si

Fin

Listar en orden descendente el valor de todos los nodos de un árbol binario de búsqueda.

Procedimiento decreciente (p: ptr_a nodo_ar)

Inicio

Si p <> nil

Entonces decreciente (pder)

Escribir pinfo

Decreciente (pizq)

Fin si

Fin

Encontrar el máximo valor de un árbol binario de búsqueda.

Procedimiento busca_max (raiz: ptr_a nodo_ar)

Var

Ptr: ptr_a nodo_ar

Inicio

Ptr raiz

Mientras ptrder <> nil

Ptr ptrder

Fin mientras

Escribir ptrinfo

Fin

Borrar el elemento menor de un árbol binario de búsqueda.

Procedimiento borrar_min (ent-sal raiz: ptr_a nodo_ar)

Var

Pad, ptr: ptr_a nodo_ar

Inicio

Si raiz = nil

Entonces escribir “Árbol vacio”

Sino pad nil

Ptr raiz

Mientras ptrizq <> nil

Pad ptr

Ptr ptrizq

Fin mientras

Si pad = nil

Entonces raiz ptrder

Sino padizq ptrder

Fin si

Ptrizq DISP

DISP ptr

Fin si

Fin

Encontrar el segundo elemento mayor de un árbol binario de búsqueda.

Procedimiento Dos_mayor (raiz: ptr_a nodo_ar)

Var

Pad,max,max2: ptr_a nodo_ar

Inicio

Si raiz = nil

Entonces escribir “Árbol vacio”

Sino pad nil

Max raiz

Mientras ptrder <> nil

Pad max

Max maxder

Fin mientras

Si ptrizq = nil

Entonces si pad <> nil

Entonces escribir “El segundo mayor es” padinfo

Fin si

Sino max2 ptrizq

Mientras max2der <> nil

Max2 max2der

Fin mientras

Escribir “El segundo mayor es” max2info

Fin si

Fin si

Fin

Añadir un bucle en el nodo con información elem.

Procedimiento ins_bucle (prin: ptr_a vertice; elem: <tipo>)

Var

Ptr: ptr_a vertice

Nuevo: ptr_a arista

Inicio

Buscar_nodo (prin,elem,ptr)

Si ptr = nil

Entonces escribir “No existe el nodo”

Sino nuevo ADISP

ADISP ADISPsig

Nuevoder ptr

Nuevoenl ptrady

Ptrady nuevo

Fin si

Fin

Dado un grafo, determinar si un nodo con información elem es un nodo fuente (que no le lleguen aristas)

Procedimiento nodo_fuente (prin: ptr_a vertice; elem: <tipo>)

Var

Ptr, pn: ptr_a vertice

Fuente: boolean

Pa: ptr_a arista

Inicio

Buscar_nodo (prin,elem,ptr)

Si ptr = nil

Entonces escribir “El nodo no existe”

Sino si ptrady = nil

Entonces escribir “Nodo sin aristas de origen”

Sino fuente verdadero

Pn prin

Mientras (pn <> nil) y (fuente = verdadero)

Pa pnady

Mientras (pa <> nil) y (fuente = verdadero)

Si padest = ptr

Entonces fuente falso

Sino pa paenl

Fin si

Fin mientras

Pn pnsig

Fin mientras

Si fuente = verdadero

Entonces escribir “Si es un nodo fuente”

Sino escribir “No es un nodo fuente”

Fin si

Fin si

Fin si

Fin

Dado un grafo en que cada arista tiene un peso asociado, determinar que aristas del grado pesan más de 100, dando la información del nodo origen y destino.

Tipo arista_peso: registro

Des: ptr_a vertice

Enl: ptr_a arista_peso

Fin registro

Procedimiento ar_peso (prin: ptr_a vertice)

Var

Pn: ptr_a vertice

Pa: ptr_a arista_peso

Inicio

Pn prin

Mientras pn <> nil

Pa pnady

Mientras pa <> nil

Si papeso > 100

Entonces escribir “Origen” pninfo

Sino escribir “Destino” padesinfo

Fin si

Pa paenl

Fin mientras

Pn pnsig

Fin mientras

Fin

TABLAS DE DECISIÓN:

TEMA 13

Qué es una tabla de decisión.

Tipos de tablas.

Construcción de tablas.

Conversión de tablas a programas.

1. QUÉ ES UNA TABLA DE DECISIÓN:

Una tabla de decisión es una herramienta que me va a servir para representar de manera más fácil la lógica de un problema cuando está es mas o menos complicada.

Para ello se trata de identificar en el problema las acciones que hay que ejecutar y las condiciones que se tienen que cumplir para ejecutar esas acciones. Las acciones normalmente las vamos a identificar a través de los verbos, y las condiciones van a ser las condicionales (si,...).

La tabla va a tener 4 partes:

Conjunto de condiciones Entrada de condiciones

o entradas combinación de condiciones

Conjunto de acciones Ejecución de acciones

o salidas salida de acciones

Conjunto de condiciones: Son las condiciones que intervienen en el problema.

Entrada de condiciones: Son las combinaciones posibles entre los valores de las condiciones. SI, NO, DA IGUAL.

Conjunto de acciones: Abarca todas las acciones que se tienen que ejecutar cuando se cumplen un conjunto dado de condiciones.

Salida de ejecución: Se determina cuando se ejecuta cada acción.

¿Qué es una regla de decisión?:

Es una combinación de un estado en la entrada de condiciones y de una o más acciones asociadas en la parte de la salida de acciones asociadas en la parte de la salida de acciones siendo N el número de condiciones y considerándolas como binarias (SI/NO) habrá un número máximo de 2 elevado a N reglas.

Cada regla equivale desde el parte de vista de programación a una estructura si.. entonces, y en cada momento solo se puede cumplir una regla.

Las tablas de decisión las podemos usar para controlar la lógica de control de un programa, en los manuales de usuario para controlar un programa, para saber cuando se actualiza un fichero,...

Ejemplo:

Si me hacen fijo me compro un corsa, si me hacen fijo y me suben el sueldo me compro un familiar, y si me toca la lotería me compro un BMW.

C1: Fijo / no fijo A1: No compro un coche

C2: Salario / no salario A2: Compro un corsa

C3: Lotería / no lotería A3: Compro un familiar

A4: Compro un BMW

Fijo	S	S	S	S	N	N	N	N
Salario	S	S	N	N	S	S	N	N
Lotería	S	N	S	N	S	N	S	N
No coche					X	X	X	X
Corsa				X
Familiar		X
BMW	X		X

2. TIPOS DE TABLAS:

• Según el planteamiento:

• Propias: Solo tienen reglas simples, solo hay SI / NO.

• Impropias: Son las que tienen reglas compuestas (SI/NO/INDIFERENCIA).

• Según entradas:

• Limitadas: Cuando las reglas son S / N / - / X (Si se ejecuta para las acciones).

• Extendidas: Cuando los valores que toman las condiciones son diferentes de SI / NO, y las acciones son distintas de si se ejecuta o no se ejecuta.

En cualquier caso, siempre se puede traducir una tabla mixta a una tabla limitada. Cada condición dará igual a tantas condiciones simples como valores pueda tomar, y para cada acción tantas acciones como estados pueda tomar.

La ventaja de las tablas mixtas y extendidas es que se ve mejor a primera vista, el inconveniente es que son más difíciles de programar.

• Según el tratamiento:

• Abiertas: Cuando desde una tabla se hace referencia a otra tabla, pero luego no se vuelve a la inicial.

• Cerradas: Lo mismo que la anterior, pero se vuelve a la original.

• Bucles: Cuando una tabla se llama a sí misma.

Tipos de reglas:

Normalmente las reglas de una tabla se consideran como reglas AND, se tienen que cumplir todos los valores de las condiciones para que se ejecute la opción asociada a esa regla.

Si se implementa como reglas OR, significa que con que se cumpla una sola regla, se ejecuta la acción asociada.

Las reglas ELSE se hacen cuando un conjunto de reglas de una tabla dan todas lugar a la misma acción, entonces se asocian todas como una regla ELSE.

3. CONSTRUCCIÓN DE TABLAS:

Primero localizamos las condiciones en el enunciado, después las acciones y las reglas entre las acciones y las condiciones.

Después compruebo que la tabla sea correcta. Que no ocurran:

• Redundancias: Poner la misma regla más de una vez.

• Completa: Que no falte alguna regla.

• Contradictoria: Que la misma acción de lugar a cosas contradictorias.

Después se mira a ver si se puede simplificar la tabla, añadiendo si es posible indiferencias (cada una sustituye a 2 reglas).

Una tabla se puede simplificar si hay 2 reglas que dan lugar a la misma acción o conjunto de acciones y solo se diferencia en el estado o valor de una de sus condiciones, entonces sustituyo esas 2 reglas por una sola, que tenga para esa condición el valor de indiferencia.

Fijo	S	S	S	S	N	N	N	N
Salario	S	S	N	N	S	S	N	N
Lotería	S	N	S	N	S	N	S	N
No coche					X	X	X	X
Corsa				X
Familiar		X
BMW	X		X

4. CONVERSIÓN DE TABLAS A PROGRAMAS:

Primero hay que ver si se puede simplificar la tabla.

Hay 2 formas de hacer la conversión:

• Programación directa: Que cada regla equivale a una sentencia condicional. Es muy ineficiente.

• Pasar la tabla de decisión a flujograma mediante el siguiente el método:

Para cada regla al final de su columna ponemos el número de reglas simples a las que equivale. Cada indiferencia de una regla equivale a 2 reglas simples.

Para cada condición al final de su fila hallamos un coeficiente que resulta de la suma de los valores de las reglas para las que esa condición valga indiferente, cuanto menor sea ese valor, más importante es esa regla, porque va a tener menos reglas para las que esa condición es indiferente.

Elijo la condición con menor valor en su coeficiente, si hay varias condiciones que tienen el mismo valor en su coeficiente y además es el menor, hallo un segundo coeficiente que se obtiene por la diferencia en valor absoluto de la diferencia entre el número de SI y NO en valor absoluto de esas condiciones, y elijo la que tenga la diferencia mayor, y si sigue habiendo empate cojo cualquiera de ellas.

Para la regla elegida obtengo otras 2 tablas, que se caracterizan porque no contienen ya a la condición por la que he dividido las tablas, y una tabla contiene las reglas para las que esa condición contiene valor SI, y la otra contiene las reglas para las que la condición es NO, y para las reglas con condición indiferencia las pongo en las 2 tablas, y con las 2 tablas vuelvo a hacer otra vez lo mismo hasta que no se pueda dividir más, y cada vez que se hace una división pago la condición en el flujograma.

Ejemplo anterior:

Fijo	S	S	S	N	0
Salario	-	S	N	-	6
Loteria	S	N	N	-	4
No coche				X
Corsa			X
Familiar		X
BMW	X
	2	1	1	4

Fijo SI

Salario	-	S	N	2
Loteria	S	N	N	0
No coche
Corsa			X
Familiar		X
BMW	X
	2	1	1

Fijo NO

Salario	-
Loteria	-
No coche	X
Corsa
Familiar
BMW

Si Fijo No

Si No

Loteria No coche

BMW Si Salario No

Familiar Corsa

Si no fijo

Entonces escribir “No coche”

Sino si loteria

Entonces escribir “BMW”

Sino si salario

Entonces escribir “Familiar”

Sino escribir “Corsa”

Fin si

Fin si

Fin si

EJERCICIOS: TEMA 13

Dado un fichero de empleados ordenado por número de empleado con el formato, número de empleado, antigüedad, sexo, categoría, se trata de hallar mediante tablas de decisión que prima recibe cada empleado sabiendo que:

A: Mujeres que son jefes.

B: Mujeres empleadas con antigüedad y hombres empleados.

C: Hombres que son jefes.

D: Sin prima. El resto.

Hacer la tabla de decisión y el flujograma.

Antiguedad	S	S	S	S	N	N	N	N
Mujer	S	N	S	N	S	S	N	N
Jefe	S	S	N	N	S	N	S	N
A	X				X
B			X	X				X
C		X					X
D						X

Antiguedad	-	-	S	N	N	4
Mujer	S	N	-	S	N	2
Jefe	S	S	N	N	N	0
A	X
B			X		X
C		X
D				X
	2	2	2	1	1

Jefe SI

Antiguedad	-	-	4
Mujer	S	N	0
A	X
B
C		X
D
	2	2

Jefe NO

Antiguedad	S	N	N	0
Mujer	-	S	N	2
A	X
B
C			X
D		X
	2	1	1

Jefe

Mujer Antiguedad

B

A C Mujer

D B

Si jefe

Entonces si mujer

Entonces escribir “A”

Sino escribir “C”

Fin si

Sino si antigüedad

Entonces escribir “B”

Sino si mujer

Entonces escribir “D”

Sino escribir “B”

Fin si

Fin si

Fin si

PÁGINA 168/1