• Jueves 28 de Marzo de 2024, 22:03

Mostrar Mensajes

Esta sección te permite ver todos los posts escritos por este usuario. Ten en cuenta que sólo puedes ver los posts escritos en zonas a las que tienes acceso en este momento.


Mensajes - MinDokan

Páginas: [1]
1
Pascal / Re: asteriscos
« en: Miércoles 6 de Octubre de 2010, 21:19 »
Cita de: "Divil"
Gracias! Pura vida!
De nada.
Saludos.

2
Pascal / Re: asteriscos
« en: Lunes 4 de Octubre de 2010, 14:47 »
Cita de: "Divil"
Hola, necesito ayuda para hacer un programa con while y/o repeat que haga lo siguiente:
*
**
***
****
*****
y otro:
*
_*
__*
___*
____*
pero no lo puedo hacer escribiendo write(' * ');

Hola devil, pasé un rato por el foro para mirar, y como tengo tiempo te voy a tirar una mano.
Eso que te plantean es para que aprendas a usar las estructuras while y repeat, y la única forma de comprenderla es practicando. De hecho yo lo estoy haciendo mientras te ayudo :P

Mirá, algo así.
Código: Pascal
  1.  
  2. var cont:integer;
  3.     car:string;
  4. cont:=0; // un contador para el while, para que termine alguna vez...
  5. car:=''; //car limpio
  6.      while cont<5 do //5, que van a ser las 5 líneas
  7.       begin
  8.       car:=car+'*'; //pascal puede sumar cosas del mismo tipo. num con num, car con car... por ejemplo.
  9.       cont:=cont+1; //incremento contador, por eso antes lo puse en 0.
  10.       writeln(car); //escribo car y listo
  11.       end; //cierro el while.
  12.  

Posiblemente te esté haciendo todo, pero es lo más simple para explicar,  :( , mi consejo es que lo leas, y trates de entender el código.

Saludos y suerte, después subí como lo hiciste ;)

3
Pascal / Re: ReadLn Ignorado!
« en: Jueves 29 de Julio de 2010, 14:10 »
readkey; también debería funcionar y cumplir la misma función.

Saludos. MDk.

Páginas: [1]