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

Вид: while условие do S;

S – любой оператор паскаля (обычно составной), является телом цикла. Если нет тела цикла, то оператор цикла называется пустым. Его можно использовать для задержки времени.

Работа: Сначала проверяется условие, если оно истинно, выполняется тело цикла, затем опять проверяется условие и т.д.. Как только условие станет ложным, оператор цикла завершает свою работу. Если условие изначально ложно, тело цикла не выполняется ни разу. Тело цикла должно содержать оператор, приближающий цикл к завершению.

Блок- схема:

Примеры:

1. Вывод на экран целых чисел от 1 до 5 включительно

i:=1; while i<=5 do begin writeln(i); i:=i+1; end;

2. Расчет суммы первых десяти четных чисел

S:=0; i:=1; while i<=10 do begin a:=2*i: s:=s+a; i:=i+1; end;

Задача.

Протабулировать функцию

Блок- схема:

Программа.

Program pr6;

Var x,y:integer;

Begin

x:=-5;

while x<=5 do

Begin

y:=sqr(x)+5;

writeln(‘x=’,x:8,’y=’,y:8);

x:=x+1;

end;

End.