Pascal/Turbo Pascal - intercambio

   
Vista:

intercambio

Publicado por nat (6 intervenciones) el 30/10/2007 08:34:32
hola!!! ocupo lo sig:
tengo un vector q rellene con 0-1 esto aleatoriamente, nesecito q cada vez q aparesca un 1 se corra un espacio, para simular q esta lista avanza.q se mueve....
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

RE:intercambio

Publicado por Mariano (57 intervenciones) el 30/10/2007 19:41:54
Hola, mira realmente no entiendo bien que es lo que necesitas, pero si es lo que pienso
haces un ciclo de la siguiente manera

for i:= i to (longituddelvector - 1) do begin {vas recorriendo el vector secuencialmente}
if vector[i] := 1 then {preguntas si el contenido es un uno}
v[i+1] := v[i] {le asignas el uno a la posicion siguiente}
end;

Si no era eso lo que necesitas, volve a preguntar, y veo si puedo ayudart :)

Adios!
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

RE:intercambio

Publicado por Diego Romero (997 intervenciones) el 05/11/2007 15:00:01
El ciclo que has hecho, toma el primer uno que encuentre y lo copia en el resto del vector hasta el final...

Pero da igual porque nat no especifica si está hablando de "espacios" en el vector o en la pantalla...
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