Sistema libros
pseudocodigo
Proceso sistemaLibros
// Entrada: opt
// auxiliar: limite
// Salida: informacion libro segun opcion
// Author: @soytipazo
// Date; 10/11/2012
Definir limite,totalPaginas,opt Como Entero
limite<-2
totalPaginas<-0
Dimension titulos(limite)
Dimension autores(limite)
Dimension isbn(limite)
Dimension numPaginas(limite)
Dimension precios(limite)
titulos(1)<-('Bajo la Rueba')
autores(1)<-('Hermann Hesse')
isbn(1)<-('978-84-2067-1-994')
numPaginas(1)<-(160)
precios(1)<-(100)
titulos(2)<-('Casa de muñecas')
autores(2)<-('Henrik Ibsen')
isbn(2)<-(': 978-84-8393-163-9 24')
numPaginas(2)<-(160)
precios(2)<-(60)
Escribir '=== Libreria ==='
Escribir 'Seleccione una opciòn para escoger el libro'
Escribir ''
Escribir '1. Ver títulos de libros almacenados'
Escribir '2. Ver autores por libro'
Escribir '3. Ver ISBN por libro'
Escribir '4. Calcular total de páginas de libros'
Escribir '5. Desplegar y calcular precios de libros'
Leer opt
Segun opt Hacer
1:
Para i<-1 Hasta limite Hacer
Escribir titulos(i)
FinPara
2:
Para i<-1 Hasta limite Hacer
Escribir 'Libro: ',titulos(i),', ','autor: ',autores(i)
FinPara
3:
Para i<-1 Hasta limite Hacer
Escribir 'Libro: ',titulos(i),', ','ISBN: ',isbn(i)
FinPara
4:
Para i<-1 Hasta limite Hacer
totalPaginas<-totalPaginas+numPaginas(i)
FinPara
Escribir 'Total de libros: ',limite
Escribir 'Suma de paginas de todos los libros:',totalPaginas
5:
Para i<-1 Hasta 2 Hacer
Escribir 'Libro: ',titulos(i),', ','precio: Q ',precios(i)
FinPara
De Otro Modo:
Escribir 'Opcion no valida'
FinSegun
FinProceso