Error al compilar programa
Publicado por Emiliano (1 intervención) el 07/04/2019 21:09:11
Buenas tardes, les quería consultar ya que estoy haciendo un trabajo para la facultad sobre el problema que estoy teniendo. Mi proceso
procedure cargarLibro(var Libros:libro);
begin
with libros do begin
if (nombre<>'zzz') then begin
writeln('Escribe el nombre del libro ');
readln(nombre);
writeln('Escribe isbn ');
read(isbn);
end;
end;
end;
El problema que presenta este proceso es que cuando se ejecuta
por segunda vez, el compilador saltea la linea de código
readln(nombre); y pasa directamente a la de abajo
dejando en pantalla Escribe isbn. Se que se soluciona con un readln; debajo de la línea read(nombre);
pero quisiera saber por qué sucede esto. Saludos.
procedure cargarLibro(var Libros:libro);
begin
with libros do begin
if (nombre<>'zzz') then begin
writeln('Escribe el nombre del libro ');
readln(nombre);
writeln('Escribe isbn ');
read(isbn);
end;
end;
end;
El problema que presenta este proceso es que cuando se ejecuta
por segunda vez, el compilador saltea la linea de código
readln(nombre); y pasa directamente a la de abajo
dejando en pantalla Escribe isbn. Se que se soluciona con un readln; debajo de la línea read(nombre);
pero quisiera saber por qué sucede esto. Saludos.
Valora esta pregunta


0