Advertisement
teslariu

menu_libreria

Sep 8th, 2021
167
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 1.86 KB | None | 0 0
  1. Proceso Libreria
  2. // Una librerìa almacena la siguente info sobre cada uno de sus libros:
  3. // CODIGO, TITULO, AUTOR, PRECIO
  4. // Los libros deben estar ordenados por código (automático)
  5. // Se precisa un algoritmo con las siguientes opciones:
  6. // a) Insertar un nuevo libro
  7. // b) Imprimir datos del libro según su código
  8. // c) Mostrar datos del libro más caro y del más barato
  9. // libros = [libro1, libro2, libro3,...] libro1=["1","Shout","Hemson","2500"]
  10. // libros = [ ["1","Shout","Hemson","2500"], ["2","La Biblia","Anonimo","3400"], ....]
  11.  
  12.  
  13. Definir opcion, codigo, long Como Entero
  14. Definir salida Como Logico
  15. Definir libros, Como Caracter
  16.  
  17. Dimension libros[100,3]
  18.  
  19. salida <- Falso
  20.  
  21.  
  22. Mientras salida = Falso Hacer
  23.  
  24. // -------------------------------------
  25. Escribir "Administración de la librería"
  26. Escribir "1. Agregar un libro"
  27. Escribir "2. Imprimir datos de un libro"
  28. Escribir "3. Datos del libro más caro"
  29. Escribir "4. Datos del libro más barato"
  30. Escribir "5. Salir"
  31. Escribir "Seleccione una opción: "
  32. Leer opcion
  33.  
  34.  
  35. Segun opcion Hacer
  36. 1:
  37. // debemos buscar la longitud de libros
  38. // y agregar al final (long)
  39. Escribir "Autor:"
  40. Leer libros[long][0]
  41. Escribir "Título:"
  42. Leer libros[long][1]
  43. Escribir "Precio:"
  44. Leer libros[long][2]
  45.  
  46. 2:
  47. Escribir "Ingrese el código:"
  48. Leer codigo
  49. // debería verificar si existe el codigo
  50.  
  51. Escribir "Título", libros[codigo-1][0]
  52. Escribir "Autor", libros[codigo-1][1]
  53. Escribir "Precio", libros[codigo-1][2]
  54.  
  55.  
  56. 3: // busco el libro con mayor precio
  57.  
  58.  
  59. 4: // busco el libro con menor precio
  60.  
  61. 5:
  62. Escribir "Gracias por usar este programa..."
  63. salida <- Verdadero
  64. De otro modo:
  65. Escribir "Opción no válida"
  66. FinSegun
  67. FinMientras
  68. FinProceso
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement