Какое значение примет переменная х в результате выполнения следующих фрагментов программ?...

Question

Какое значение примет переменная х в результате выполнения следующих фрагментов программ?
1) x:=0; for y:=1 to 9 do x:=x+y;
2) x:=1; for y:=1 to 5 do x:=x*y;
3) x:=1; while x<>1 do begin x:=x+3; x:=x+1; end;
4) x:=1; while x<100 do begin x:=x*2; end;<br>
Сколько раз выполниться тело цикла:
а) For i:=1 to 10 do x:=x+i;
б) For k:=2 to 22 do
If k mod 2=0 then s:=s+1;

Answer 1

Какое значение примет переменная х в результате выполнения следующих фрагментов программ? 
1) x:=0; for y:=1 to 9 do x:=x+y; 

y:=1    x = 1
y:=2    x = 3
y:=3    x = 6
y:=4    x = 10
y:=5    x = 15
y:=6    x = 21
y:=7    x = 28
y:=8    x = 36
y:=9    x = 45

x = 45

2) x:=1; for y:=1 to 5 do x:=x*y; 

y=1   x=1
y=2   x=2
y=3   x=6
y=4   x=24
y=5   x=120

x=120

3) x:=1; while x<>1 do begin x:=x+3; x:=x+1; end; 

x=1 (так как условие не используется)

4) x:=1; while x<100 do begin x:=x*2; end;<br>
x=2       (2<100)<br>x=4       (4<100)<br>x=8       (8<100)<br>x=16     (16<100)<br>x=32     (32<100)<br>x=64     (64<100)<br>x=128   ( 128>100)

x=128 

Сколько раз выполниться тело цикла:
а) For i:=1 to 10 do x:=x+i;
10 раз (i=1   i=2   i=3   i=4   i=5   i=6   i=7   i=8   i=9   i=10)
б) For k:=2 to 22 do
If k mod 2=0 then s:=s+1;
11 раз (k=2   k=4   k=6   k=8   k=10   k=12   k=14   k=16   k=18   k=20   k=22)
(остальные k условию не соответствуют)