elhacker.net cabecera Bienvenido(a), Visitante. Por favor Ingresar o Registrarse
¿Perdiste tu email de activación?.
 
Inicio Ayuda Buscar Ingresar Registrarse
27 Mayo 2012, 10:00  


Tema destacado: Entra al canal IRC oficial de #elhacker.net

+  Foro de elhacker.net
|-+  Programación
| |-+  Programación General
| | |-+  Ejercicios
| | | |-+  Array bidimensional en pascal.
0 Usuarios y 1 Visitante están viendo este tema.
Páginas: [1] Ir Abajo Respuesta Imprimir
Autor Tema: Array bidimensional en pascal.  (Leído 5,992 veces)
sv51

Desconectado Desconectado

Mensajes: 3


Ver Perfil
Array bidimensional en pascal.
« en: 21 Junio 2008, 02:28 »

 Hola amigos, estoy metido en un problema con un array bidimensional de 3x3. Tengo que meter 9 numeros y despues mostrarlos en pantalla de la siguiente manera:

        1 2 3
        4 5 6
        7 8 9

Bueno ya pude introducir los datos pero al imprimirlos me sale asi
1
2
3
4
5
6
7
8
9

Se que puede hacer asi [1][1] [1][2] etc ......... pero me gustaria hacerlo con un mientras (pascal while do) pero no me sale. ¿Alguien me puede ayudar por favor?


En línea
cassiani


Desconectado Desconectado

Mensajes: 946


« Anterior | Próximo »


Ver Perfil WWW
Re: Array bidimensional en pascal.
« Respuesta #1 en: 21 Junio 2008, 02:51 »

Puedes hacer uso del gotoxy  :o


En línea

DarK_FirefoX


Desconectado Desconectado

Mensajes: 685


Be the change you wanna see in the world


Ver Perfil
Re: Array bidimensional en pascal.
« Respuesta #2 en: 21 Junio 2008, 03:23 »

Por favor si pudieras explicarte un poquito más te podriía ayudar...es que no entiendo bien tu cuestión.

Lo que quieres es mostrarlo uno al lado del otro??


Código
writeln(array[indice1],' ',array[indice2],' ',array[indice3],' ',array[indice4],' ',array[indice5],' ',array[indice6],' ',array[indice7],' ',array[indice8],' ',array[indice9]);

Dime si te sirve, sino explica un poco...
« Última modificación: 21 Junio 2008, 03:26 por DarK_FirefoX » En línea

GroK


Desconectado Desconectado

Mensajes: 680


...I have become comfortably numb...


Ver Perfil
Re: Array bidimensional en pascal.
« Respuesta #3 en: 21 Junio 2008, 04:42 »

Lo normal para eso es hacer:

Código
Var 
  Matriz : Array [1..3, 1..3] of Byte;
  i, j   : Byte;
 
Begin
 
  { Aqui codigo para insertar los numeros }
  { . . . }
 
  For i := 1 To 3 Do
  Begin
     For j := 1 To 3 Do
        Write (Matriz[i][j], ' ');
     WriteLn ();
  End;
 
End.

Y si quieres hacerlo con While...

Código
i := 1; j := 1;
 
While (i <= 3) Do
Begin
  While (j <= 3) Do
  Begin
     Write (Matriz[i][j], ' ');
     Inc (j);
  End;
  WriteLn ();
  Inc (i);
  j := 1;
End;

Saludos   
 
En línea

"I put on my Hendrix album and my son said 'Dad, who's that?' and i said 'Well son, that's God' "- Robert Plant

sv51

Desconectado Desconectado

Mensajes: 3


Ver Perfil
Re: Array bidimensional en pascal.
« Respuesta #4 en: 21 Junio 2008, 22:30 »

SOLUCIONADO

Gracias Grok, ya lo pude hacer. Tambien muchas gracias Dark FireFox y cΔssiΔnі por responder a mi pregunta.

:-D
En línea
Páginas: [1] Ir Arriba Respuesta Imprimir 

Ir a:  

Powered by SMF 1.1.16 | SMF © 2006-2008, Simple Machines