Пример2. Вычислите сумму n-целых чисел

program primer2;

var S,n,i:integer;

begin

writeln('Введите число n');

read(n);

i:=1;

S:=0;

repeat

S:=S+i;

i:=i+1;

until i>n;

writeln('S= ',S);

end.

Оператор повтора for

Это оператор с известным числом повторений. Часто этот оператор повтора называют оператором цикла с параметром, так как число повторений задается переменной, называемой параметром цикла, или управляющей переменной.

Оператор повтора for может быть представлен в двух форматах:

for <параметр цикла>:= <S1> to <S2> do <тело цикла>;

for <параметр цикла>:= <S1> downto <S2> do <тело цикла>;

где <параметр цикла> - это переменная целого, символьного, логического или перечисляемого типов;

SI и S2 — выражения, определяющие соответственно начальное и конечное значения параметра цикла;

for... do — заголовок цикла;

Тело цикла может быть простым или составным оператором. Оператор for обеспечивает выполнение тела цикла до тех пор, пока не будут перебраны все зна­чения параметра цикла от начального до конечного.

Действие команды. Параметру цикла присваивается значение выражения S1. Если оно меньше или равно, чем значение выражения S2, то выполняется тело цикла. После этого значение параметра автоматически увеличивается на единицу и оно снова сравнивается со значением выражения S2 и т.д. Когда значение параметра станет больше, чем значение выражения S2, то выполняется следующий после цикла оператор.

Шаг изменения параметра цикла для оператора for…to…do равен +1, а для оператора for…downto…do равен -1.

Дата добавления: 2014-01-07