Question

Помогите срочно. Пожалуйста

Задача №1 Выполнить трассировку (прогон) программы и определить, что будет выведено на экран после выполнения фрагмента программы. (4 балла)


……


Begin


А:=1;


For С:=10 downto 5 do


Begin


A:=A+C;


End;


Writeln (‘Значение A=’, A);


End.


Задача №2 Выполнить трассировку (прогон) программы и определить, чему будет равно значение переменной b после выполнения фрагмента программы. (4 балла)


……


Begin


b:=0;


For k:=2 to 3 do


Begin


For i:=1 to 2 do


b:=b+2*i*k;


End;


End;


b:=sqr (b);


Writeln (‘b=’, b);


End.


Задача №3 Выполнить трассировку (прогон) программы и определить, чему будет равно значение переменной X и S после выполнения фрагмента программы. (7 баллов)

……

Begin

S:=0; X:=10; A:=0; B:=0;

For i:=1 to 3 do

Begin

S:=S+2*i;

if X>=6 then X:=X / 2

else X:=X*6;

End;

if S
S:=Dec (S);

X:=Inc(X);

End;

Writeln (‘X=’, X);

Writeln (‘S=’, S);

End.

Answer 1

Ответ:

1) 46 2)4 3)S = 11 Х = 6

Объяснение:

1) А = 1+10+9+8+7+6+5 = 46

2) b = b + 2*1*2 = 4

b = 4 + 2*2*3 = 16

корень 16 = 4

3) s = s+2*1= 2

s = 2+2*2 = 6

s = 6+2*3= 12

X больше чем 6 поэтому делим его на 2

x = 5

12-1 = 11

5+1 = 6