Ejercicio 18 de Speint : ejercicio que permite registrar la información de cinco atures de libros

Proceso libros
Definir x,a,c Como Caracter;
Definir d,e,b como entero;
Dimension x(5,5);
d<-0;
Repetir

Para e<-0 Hasta 4 Con Paso 1 Hacer
Escribir "titulo del libro";
Leer x(e,4);
Escribir "Autor";
Leer x(e,3);
Escribir "nombre";
Leer x(e,2);
Escribir "año de edicion";
leer x(e,1);
Escribir "codigo del libro";
Leer x(e,0);
FinPara
d<-0;
Para e<-0 Hasta 4 Con Paso 1 Hacer
Escribir x(e,0);
Escribir x(e,1);
Escribir x(e,2);
Escribir x(e,3);
Escribir x(e,4);
FinPara
Escribir "para salir escriba la palabra, escribus";
Leer c;
Hasta Que c = "escribus"
FinProceso