Оператор цикла с параметром (цикл for).

где

переменная называется параметром или счетчиком цикла.

Действие оператора цикла типа to (прямой счет):

1. переменной присваивается значение выражения1;

2. проверяется условие: значение переменной больше значения выражения2?

3. если да, то цикл прекращается; если нет, то выполняется оператор, значение переменной увеличивается на единицу и далее действие повторяется, начиная с пункта2.

Действие оператора цикла типа downto (обратный счет):

1. переменной присваивается значение выражения1;

2. проверяется условие: значение переменной меньше значения выражения2?

3. если да, то цикл прекращается; если нет, то выполняется оператор, значение переменной уменьшается на единицу и далее действие повторяется, начиная с пункта 2.

Правила:

1. Параметром цикла может быть только целая переменная.

2. Параметр цикла не может явным образом меняться в теле цикла.

Например:

for i:=1 to 10 do

begin

a:=a+2;

i:=i+1; {неверно}

end;

3. Шаг цикла может быть равен только +1 (цикл с to) или –1 (цикл с downto).

4. В соответствии с общим видом тело цикла должно состоять из одного оператора, если операторов несколько, используем составной оператор и операторные скобки begin..end;.

5. Цикл может не выполниться ни одного раза.

Задание: Написать блок-схему и программу для расчета среднего значения n введенных с клавиатуры чисел.

program means;

var i,n: integer; x,s: real;

begin

write(‘Введите кол-во чисел’);

readln(n);

s:=0;

for i:=1 to n do

begin

write(‘Введите число номер’,i);

readln(x);

s:=s+x;

end;

writeln(‘Среднее значение =’,s/n);

end.

Оператор цикла с предусловием (while)

Оператор цикл while – это оператор цикла с заранее неизвестным числом повторений.

Общий вид:

while логическое выражение do оператор;

где

логическое выражение - это условие продолжения цикла.

1. вычисляется логическое выражение;

2. если оно истинно, то выполняется оператор, после чего все действия повторяются, начиная с пункта 1;

3. eсли логическое выражение - ложно, то цикл прекращается.

Правила:

1. Тело цикла должно состоять только из одного оператора, если их несколько используем составной оператор.

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

3. Для того, чтобы цикл не стал бесконечным, в теле цикла должны изменяться величины, входящие в логическое выражение.

Например:

a:=1;

while a<100 do

begin

y:=sqrt(x*x-4);

z:=z+1;

a:=a+1;

end;

Задание. Написать блок-схему и программу, которая вычисляет и выводит на печать таблицу значений функции .

program tabl;

uses crt;

var x,xn,xk,y,h: real;

begin

clrscr;

writeln('Введите начальное, конечное значение х и шаг изменения х');

read(xn,xk,h);

writeln('| x | y |');

x:=xn;

while x<=xk do

begin

y:=x*x+1;

writeln('|',x:7:2,'|',y:7:2,'|');

x:=x+h;

end;

end.