Пример 1.6: Вычислить факториал числа (n!=1×2×3×…×n).
F:=1;
Для K:=1 до N делать
F:=F*K;
Писать (‘n!=’, F);
F :=1;
FOR K:=1 TO N DO
F:=F*K;
WRITELN (‘n!=’, F);
FOR – для
TO – до
DO – делать
Цикл с параметром
Если в этом операторе вместо TO использовать DOWNTO, то при каждой итерации значение параметра K будет уменьшаться на единицу.