Nombre archivo: Libros.dat
Campos o atributos: Código _ libro
Nombre _ libro
Autor _ libroEditorial _ libro
Categoría _ libro
Algoritmo menú principal
Variables
Opción = 0
Inicio
RepetirEscribir (“1.mantenimiento libros”)
Escribir (“2.total libros”)
Escribir (“3.terminar”)
Leer (opción)Caso que opción sea:
1. proc_matenimiento
2. proc_cantidad _total
Fin caso que
Hasta que opción = 3
Fin
Procedimiento proc_ mantenimientoAlgoritmo mantenimiento Libros (sub. menú)
Variables
Opción = 0
Inicio
Abrir Libros.Dat
RepetirEscribir (“1.incluir libro”)
Escribir (“2.modificar libro”)
Escribir (“3.borrar libro”)
Escribir(“4.consultar libro”)
Escribir (“5.terminar”)
Leer (opción)
Caso que opción sea:1. proc_incluir
2. proc_modificar
3. proc_borrar
4. proc_consultar
Fin caso que
Hasta que opción = 5
CerrarLibros.Dat
Fin
Procedimiento proc_ incluir
Variables
Mas _ Libros = “S”
Código = 0
Nombre = “ ”Autor = “ ”
Editorial = “ ”
Categoría = “ ”
Inicio
Abrir Libros.Dat
Repetir
Escribir…