Pascal/Turbo Pascal - No me lee los caracteres

   
Vista:

No me lee los caracteres

Publicado por Florencia (1 intervención) el 17/10/2017 16:31:53
Hola, tengo que hacer este ejercicio para la uni, me da error y no entiendo por qué, si podrían ayudarme lo agradecería mucho.
este programa tendria que quedar, por ejemplo, si pongo 3 caracteres adt:
a bcde
d efghi
t uvwx

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
program am;
var fin,v:integer; l:char;
  begin
    write('Ingrese la cantidad de caracteres a leer: ');
    read(fin);
    writeln('Escriba una secuencia: ');
    for v:= 1 to fin do begin
     read(l);
     write(l,' ');
     write(succ(l));
     write (succ(succ(l)));
     write(succ(succ(succ(l))));
     write(succ(succ(succ(succ(l)))));
    end;
    readln;
    readln;
    end.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

No me lee los caracteres

Publicado por David (189 intervenciones) el 17/10/2017 21:46:35
Sin haber probado el código, lo primero que veo es que usas read para leer variables en lugar de readln. Si haces eso no vacías el buffer del teclado y te puede dar ese tipo de errores. Yo te recomendaría que usaras read sólo para leer ficheros con tipo, y readln para leer ficheros de texto y variables.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar
Revisar política de publicidad