elrata

¿Sigue vigente esta pregunta? Que bosta.. no me llego ningún aviso de preguntas...

¿Te llego la consulta? Esto, ¿lo tienes que hacer con vectores? (Array) ¿Sabes la cantidad de valores a ingresar o son indeterminados?

Upa, no se si llevo el envio anterior, te saque bastante codigo repetido, fijate y todo caso, mandame un correo a hot mail (gabarenas) por si te quedo alguna duda Saludos program naval; uses dos,crt ; CONST UNDIDO='UNDIDO'; AVERIADO='AVERIADO'; type...

Tienes algo hecho así no me mato escribiendo... Sino, te lo puedo armar para mañana o pasado...

Tengo un problema y es que estoy muy limitado con el tiempo Pásame todo lo que hayas hecho, así puedo seguir a partid de ahí. Todo caso, mandamelo a gabarenas at hotmail dot com

Si no entendí mal, la soluicion seria esta... Uses Crt; Var i,j:Integer; valor:Array [1..3, 1..3] of Integer; Begin ClrScr; for i:=1 to 3 do Begin For j:=1 to 3 do Begin GotoXY(1, 1); Write('Ingrese el dato de la posicion ',i,', ',j,' : ');...

Te hice así... rápidamente... sin funciones ni procedimientos... pero eso se puede agregar fácilmente... Pero espero te sirva la resolución... Var mat:Array [1..15, 1..15] of byte; n:Integer; des:Integer; i,j:Integer; Begin Write('Ingrese el valor de...

el tema es un poco complicado... Por un lado, podes podener (siempre hablando de turbo pascal) un gotoxy() y mostrar el texto con un textcolor() variable para que de la sensación parpadeante. El tema es... si el resultado es una salida donde...

Jajajaj, eso me ha pasado millones de veces... jajajaj Si, eso es porque perdés el puntero inicial, o simplemente, el puntero inicial queda apuntando al ultimo Asegurate de guardar el principio de la lista en una variable auxiliar Si queres, pasame...

Upa! Yo en cuanto a juegos, no me he dedicado mucho, más que juegos simples (tetris, o por ejemplo algún pacman en red o cosas como esas) Nunca trabaje con animaciones o cosas por el estilo en Pascal, lo mio siempre fue hacer librerías para...