Урок Тема: «Понятие циклы»

3) цикл с параметром

Цикл на заданное число повторений с возрастающим или убывающим значением параметра.

Применяется в тех случаях, когда количество повторений выполнения команд заранее известно.

Форма записи:

1.for параметр: = начальное значение to конечное значение do оператор;

Пример. For k:=2 to 10 do p:=p*k

В этих операторах нет шага изменения параметра. Он в этом случае постоянен и равен 1.

2.for параметр := начальное значение down to конечное значение do оператор

Пример. For i:=640 down to 1 do x:=x+i

В данном случае шаг цикла равен 1

Для изменения шага в цикле :

• 
  Вводят дополнительную переменную, отвечающую за изменение шага в алгоритме.
  
• 
  Изменяют значение переменной цикла, при этом учитывая:
  

-целый тип;

-конечное значение.

В тех случаях когда изменение параметра цикла д\б иным используются циклы с предусловием и постусловием. В качестве оператора может выступать составной оператор.

For переменная := нач. значение to (down to) конечное значение to

Begin

Оператор1; операторные

Оператор2; скобки

………

Оператор n;

End.

Замечания:

• 
  Параметр – целый тип;
  
• 
  В цикле можно использовать операторные скобки;
  

• 
  В теле цикла нельзя менять параметр цикла;
  
• 
  Параметр цикла увеличивается на единицу;
  
• 
  Начальное значение > конечного, иначе тело цикла игнорируется;
  
• 
  Для уменьшения параметра, To заменяется на DownTo.
  

Пример3.

program for1;

uses crt;

var

i, sum: integer;

begin

sum:=0;

for i:=1 to 50 do

sum:=sum+i;

writeln ('summa =',sum);

repeat until keypressed;

end.

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

Д\з: найти произведение первых 50 чисел