Ciclos en Pascal

While
La instruccion while estudia primero la condicion y, en caso de que se cumpla, procedera a ejecutar la(s) instruccion(es) deseada(s).
Su estructura es:

while (condicion) do
 instruccion;

En caso de que haya mas de una instruccion a realizar, escribiremos:

while (condicion) do
 begin
  instrucciones;
 end;

_________________________________________________________________________________

 For
El ciclo for realiza la(s) instruccion(es) deseada(s) durante un numero de vueltas predeterminadas. Este numero de vueltas no podra ser modificado NUNCA dentro del bucle, por lo que debemos tener cuidado en no tocar la variable indice (la que controla el numero de vueltas). Un ejemplo:
program pruebaFor;
CONST
 N = 10; { numero de vueltas que dara el bucle}
VAR
 i: integer; { variable que contara el numero de vueltas que llevamos}
BEGIN
 for i:=1 to N do
  writeln(i);
END.
Y se mostraria por pantalla:
1
2
3
4
5
6
7
8
9
10
En caso de que tengamos que ejecutar mas instrucciones dentro del bucle, escribiriamos:
for (contador) do
 BEGIN
  instrucciones;
 END;
Un ejemplo de esto:
program pruebaForDos;
CONST
 N=10;
VAR
 i,j : integer; {Una nueva manera de declarar las variables. En caso de tener varias del mismo tipo,podemos separarlas por ","}
BEGIN
 j:=0;
 for i:=1 to N do
  begin
   writeln(i);
   j:=j+3;        {Con esta instruccion, a la variable j la sumamos durante N veces 3}
  end;
  write('j = ',j); {Cuando vamos a escribir varias cosas seguidas, podemos enviar la instruccion de esta manera}
END.
Y en pantalla se imprimiria:
1
2
3
4
5
6
7
8
9
10
j = 30
En los ciclos For, podemos seguir dos tipos de direccion. Ascendente (de 1 hasta N) o descendente (de N hasta 1). Esto lo deberemos indicar en el contador del siguiente modo (usaremos el ejemplo anterior):
Ascendente
for i:=1 TO N do
...
Descendente
for i:=N DOWNTO 1 do
 
__________________________________________________________________________________
 
Repeat
El bucle Repeat realiza una serie de instrucciones y, una vez hechas, comprueba una condicion. En caso de cumplirse, no volvera a repetir dichas instrucciones, y en caso contrario las ejecutara. Su estructura es:
repeat
 instruccion(es);
until (condicion);
__________________________________________________________________________________
 
Observese que los 3 ciclos, bien implementados, son equivalentes entre si.Hay que tener especial cuidado en el ciclo que se desea usar: · Si se desea 
hacer un numero de vueltas FIJO, podemos usar cualquiera de los 3. · 
Si las vueltas dependen de una condicion que se modifica dentro del bucle,
solo podemos usar los ciclos WHILE y REPEAT. · 
Si queremos comprobar una condicion antes de realizar ciertas instrucciones, 
debemos usar el WHILE.