Rellenar un array en pascal
Publicado por kezern (5 intervenciones) el 16/05/2009 20:42:40
Hola a todos.
Tengo declarado un array de enteros de 10 posiciones, pero el usuario puede meter 10 o menos enteros y no se como controlarlo. Yo había hecho algo así
type tabla=array[1..10] of integer;
var t:tabla;
i:integer;
begin
for i:=1 to 10 do
begin
read (t[i]);
end;
Lo que me ocurre es que hasta que no mete 10 números el bucle no termina.
¿Qué puedo hacer?
Tengo declarado un array de enteros de 10 posiciones, pero el usuario puede meter 10 o menos enteros y no se como controlarlo. Yo había hecho algo así
type tabla=array[1..10] of integer;
var t:tabla;
i:integer;
begin
for i:=1 to 10 do
begin
read (t[i]);
end;
Lo que me ocurre es que hasta que no mete 10 números el bucle no termina.
¿Qué puedo hacer?
Valora esta pregunta
![Me gusta: Está pregunta es útil y esta clara Me gusta: Está pregunta es útil y esta clara](/img/img.png?11.51)
![NO me gusta: Está pregunta no esta clara o no es útil No me gusta: Está pregunta no esta clara o no es útil](/img/img.png?11.51)
0