Question

1. Проанализируйте работу программы.

program math;

var x, y: integer;

begin

x:=1;

y:=1

while x<7 do

begin

y:=y*2;

x:=x+1

end;

end.

Ответьте на вопросы:

1) Сколько раз исполнится тело цикла?

2) Какое значение примет x после завершения программы?

3) Какое значение примет y после завершения программы?

4) Сколько раз исполнится тело цикла, если изменить условие на x<=7?

5) Сколько раз исполнится тело цикла, если изменить условие на x>7?

6) Сколько раз исполнится тело цикла, если изменить условие на x>0?

7) Что произойдет, если из тела цикла убрать команду x:=x+1?

8) Сколько раз исполнится тело цикла, если изменить команду x:=x+1 на x:=x+2?

9) Сколько раз исполнится тело цикла, если изменить команду x:=x+1 на x:=x+2?