Pascal/Turbo Pascal - Problema con la cantidad de celdas de un array.

 
Vista:
sin imagen de perfil
Val: 2
Ha disminuido su posición en 39 puestos en Pascal/Turbo Pascal (en relación al último mes)
Gráfica de Pascal/Turbo Pascal

Problema con la cantidad de celdas de un array.

Publicado por Axel LeVan (1 intervención) el 16/12/2020 18:06:56
Tengo un código en el que le pido al usuario ingresar una cantidad de letras para llenar un arreglo de 4 celdas, pero quiero que, a la hora de escribir sus caracteres, ingrese sólo 4, ni más ni menos. ¿Cómo puedo hacer para que, al ingresar una cantidad distinta de caracteres, se notifique de un error al usuario?

1
2
3
4
5
6
7
[...]
write('Ronda ', (ronda+1), ' de ', MAX_INTENTOS, '>> ');
   for i:= 1 to LARGO_CODIGO do begin //LARGO_CODIGO es una constante igual a 4.
     read(Respuesta[i]);
   end;
   readln;
[...]
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

Problema con la cantidad de celdas de un array.

Publicado por ramon (2158 intervenciones) el 10/01/2021 17:12:07
1
2
3
4
5
6
7
8
9
10
11
12
13
14
var
    le : integer;
    tec : char;
 
  write('Ronda ', (ronda+1), ' de ', MAX_INTENTOS, '>> ');
  le := 1;
  repeat
     tec := readkey;
     Respuesta[le] := tec;
     le := le + 1;
  until le = LARGO_CODIGO;
  for le := 1 to 4 do
  write(Respuesta[le]);
   end;
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