Организация циклов

Материал из Pocket Fallout для КПК на PDA PC PPC Mobile.

Содержание 1 Что такое "цикл" 2 Цикл с параметром for 2.1 Синтаксис цикла for 2.1.1 Примечания 2.2 Пример 3 Цикл с пред условием while 3.1 Синтаксис цикла while 3.2 Пример 4 Замечание

Что такое "цикл"

Цикл - это выполнение некоторой последовательности действий указанное число раз.
В модулях PFSL можно организовать следующие виды циклов :

Цикл с параметром for

Данный цикл предназначен для выполнения последовательности действий фиксированное число раз. Последовательный перебор значений начинается со значения <нач. значение> и завершается достижением значения <кон. знач>. Текущее значение параметра цикла хранится в переменной - <имя переменной>.

Синтаксис цикла for

for [var]<имя переменной> = <нач. значение> to <кон. знач> [step <шаг>]
   [оператор 1;]
   [оператор 2;]
   [оператор 3;]
   …
   [оператор n;]
endfor 

Примечания

• В качестве параметров должны участвовать целочисленные значения !
• Значение <шаг> может быть и отрицательным
• Конструкция for [var]<имя переменной>... возможна лишь для НЕ ВЛОЖЕННЫХ циклов

Пример

procedure testFor(in_param)
   if in_param>1 then
        dim arr[in_param];
        for var i=0 to in_param-1
            arr[i]=i;
        endfor
   else  // если входной параметр <1, тогда - вываливаемся
        return;
   endif
endprocedure

Цикл с пред условием while

Данный цикл предназначен для выполнения последовательности действий до тех пор, пока выражение <выражение> истинно (см. Логические операции).

Синтаксис цикла while

while <выражение>
    [оператор 1;]
    [оператор 2;]
    [оператор 3;]
    …
    [оператор n;]
endwhile

Пример

procedure testWhile(in_param)
    var i = in_param;
    var sum = 0;
    while (i > 0)
       sum = sum + i;
       i = i - 1;
    endwhile
endprocedure

Замечание

конструкции типа

     if a==1 then
       endwhile
     endif

недопустимы !