Циклические алгоритмы

Организация циклов в языке программирования Паскаль.

Циклом называется последовательность многократно повторяющихся действий.

• При решении алгоритмических задач может возникнуть необходимость повторить одни и те же действия несколько раз. Такие действия называют циклическими или циклами.
• Процесс называется циклическим, если вычисления в нём многократно повторяются по одним и тем же формулам при разных значениях входящих в них переменных.
• Алгоритмическая структура “Цикл” обеспечивает многократное выполнение некоторой последовательности действий, которая называется телом цикла .

В Паскале различают циклы:

• 1) с неопределенным числом повторений ; здесь различают цикл с пред-условием (цикл “Пока”) и цикл с пост-условием (цикл “До”).
• 2) с определённым числом повторений (цикл с параметром, или цикл со счетчиком, или цикл “Для”);

В Паскале существуют 3 вида циклов :

• цикл с пред-условием While do…
• цикл с пост-условием Repeat Until
• цикл с параметром For …. to ….. do

Оператор цикла (с пред-условием) While do…

  1. Цикл с пред-условием

While do Begin

; ; ; . . .

End;

Замечания:

• Если в теле цикла записано более одной команды, то тело цикла заключается в операторные скобки begin и end .
• Инструкция цикла while выполняется до тех пор, пока условие, записанное после слова while, истинно .
• После слова while надо записывать условие продолжения (выполнения) цикла.
• Цикл while – цикл с предусловием, т.е. инструкции тела цикла вообще могут быть не выполнены.
• В цикле while проверка условия выхода из цикла выполняется в начале цикла.

Оператор цикла (с пост-условием ) Repeat Until

  2. Цикл с пост-условием

Repeat

; ; ;

… . Until ;

Замечания:

• Зарезервированные слова repeat и until обрамляют тело цикла, поэтому дополнительные пары операторов begin и end уже не обязательны.
• Цикл repeat выполняется до тех пор, пока условие, стоящее после слова until, ложно .
• После слова until записывается условие завершения цикла (оно противоположно для условия продолжения цикла).
• Цикл repeat – цикл с постусловием, т.е. тело цикла выполняется хотя бы один раз.

:= to do Begin ; ; ; . . . End; " width="640"

Оператор цикла с параметром (цикл для): For …. to ….. do

For переменная := to do

Begin

; ; ; . . .

End;

Замечания:

• Цикл For используется для организации циклов с фиксированным , определяемым во время разработки программы, числом повторений.
• Количество повторений цикла определяется начальным и конечным значениями переменной-счётчика (т.е. параметром).
• Переменная – счётчик должна быть целого типа.

10 end . program Числа; var X: integer; begin X := 1 ; While X do begin writeln(X); X := X + 1; end ; end .     " width="640"

Составить программу вывода 10 целых чисел на экран.

Цикл (с пост-условием)

Repeat Until

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

Цикл (с пред-условием)

For … to … do …

While do…

program Числа;

program Числа;

var

var

X: integer;

X: integer;

begin

begin

X := 1;

For X := 1 to 10 do

writeln(X);

Repeat

writeln(X);

end .

X := X + 1 ;

Until X 10

end .

program Числа;

var

X: integer;

begin

X := 1 ;

While X do

begin

writeln(X);

X := X + 1;

end ;

end .  

Общая схема циклов в Паскале

Пример : Напечатать таблицу квадратов чисел от 20 до 30.

Program Kvadrat;

Var X,Y: integer ;

Begin

For X:= 20 to 30 do

Begin

Y:=X*X;

Write( 'X=' ,X);

Writeln( 'Y=' ,Y);

End ;

End .

Вычислить произведение первых N целых положительных чисел. Количество чисел вводится с клавиатуры.

Пример 1 : Вычислить произведение первых N целых положительных чисел. Количество чисел вводится с клавиатуры.

Program Proizvedenie;

Var N,X,P: integer;

Begin

Writeln(‘ введите количество чисел N ‘);

readln(N);

P:=1;

X:=1;

While X

Begin

P:=P*X;

X:=X+1;

end;

Writeln(‘произведение‘, N, ‘ чисел равно ‘, P);

End.