Определите значение переменной S после выполнения фраг- мента программы. Ответ...

Question

Определите значение переменной S после выполнения фраг- мента программы. Ответ обосновать. S:=0; for i:= 1 to 4 do begin k:=2 S := S*2; for j:= 3 downto 2 do begin while k < 3 do begin S :=S+i+j+k; k:=k+1 end; end;

Answer 1

s=0

i=1

k=2

s=0*2=0

j=3

s=0+1+3+2=6

k=2+1=3

i=2

k=2

s=6*2=12

j=3

s=12+2+3+2=19

k=3

i=3

k=2

s=19*2=38

j=3

s=38+3+3+2=46

k=3

i=4

k=2

s=46*2=92

j=3

s=92+4+3+2=101

k=3

Ответ: 101.

P.S.

Ошибка в написании программы, которая путает.

Либо в конце написать еще один end;

Либо строчку

for j:= 3 downto 2 do begin

исправить на

for j:= 3 downto 2 do

Comments

спасибо тебе, очень выручил.