algoritmos



CICLO FOR
Los ciclos For le permiten evaluar una secuencia de expresiones varias veces. Esto es diferente a los enunciados If y Select, donde el programa pasa por cada expresión máximo una vezdurante la evaluación de la fórmula.
Los ciclos For funcionan mejor cuando conoce de antemano la cantidad de veces que es necesario evaluar una expresión.
Uso de un ciclo For
Suponga que deseainvertir la cadena {Cliente.Nombre del cliente}. Por ejemplo, la compañía "City Cyclists" pasa a ser "stsilcyC ytiC".

Local StringVar str := "";
Local NumberVar strLen :=
Length ({Customer.CustomerName});
Local NumberVar i;
For i := 1 To strLen Do
(
Local NumberVar charPos := strLen - i + 1;
str := str + {Customer.Customer Name}[charPos]
);
str

Examine cómo funciona esta fórmulaasumiendo que el valor actual del campo {Customer.Customer Name} es "Clean Air". La variable strLen se asigna como longitud de "Clean Air", es decir, 9. La variable i se conoce como variable de contador yaque su valor cambia con cada iteración del ciclo For. Es decir, se usa para contar las iteraciones del ciclo. El ciclo For se repetirá 9 veces; la primera vez, i es 1, luego, i es 2, después, i es 3 yasí sucesivamente hasta que, finalmente, i es 9. Durante la primera repetición, el noveno carácter de {Cliente.Nombre del cliente} se anexa a la variable de cadena str vacía. Por eso, cadena es iguala "r" después de la primera iteración. Durante la segunda iteración, el octavo carácter de {Customer.Customer Name} se anexa a cadena y de este modo cadena es igual a "ri". Esto continúa hastadespués de la novena iteración, la cadena es igual a "riA naelC", que es la cadena invertida.
Uso de un ciclo For y una cláusula Step
He aquí una versión más simple de la fórmula anterior, que usa unacláusula Step con un valor negativo de Step igual a -1. En el ejemplo de "Clean Air", i es 9 en la primera repetición, 8 en la segunda, 7 en la tercera y así sucesivamente hasta la repetición final, en...