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

Answer 2

Для решения этих задач, выполним трассировку программ пошагово:

Задача №1:

mathematicaCopy code
Begin
  A := 1;
  For C := 10 downto 5 do
  Begin
    A := A + C;
  End;
  Writeln('Значение A=', A);
End.

Шаг 1: A = 1 Шаг 2: A = 1 + 10 = 11 Шаг 3: A = 11 + 9 = 20 Шаг 4: A = 20 + 8 = 28 Шаг 5: A = 28 + 7 = 35 Шаг 6: A = 35 + 6 = 41 Шаг 7: Вывод на экран "Значение A=41"

Ответ для задачи №1: После выполнения программы будет выведено "Значение A=41".

Задача №2:

cssCopy code
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.

Шаг 1: b = 0 Шаг 2: k = 2, i = 1, b = 0 + 2 * 1 * 2 = 4 Шаг 3: k = 2, i = 2, b = 4 + 2 * 2 * 2 = 12 Шаг 4: k = 3, i = 1, b = 12 + 2 * 1 * 3 = 18 Шаг 5: k = 3, i = 2, b = 18 + 2 * 2 * 3 = 30 Шаг 6: b = sqr(30) = 900 Шаг 7: Вывод на экран "b=900"

Ответ для задачи №2: После выполнения программы значение переменной b будет равно 900.

Задача №3:

cssCopy code
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 > X then
    S := Dec(S);
  X := Inc(X);
  Writeln('X=', X);
  Writeln('S=', S);
End.

Шаг 1: S = 0, X = 10, i = 1 S = 0 + 2 * 1 = 2, X = 10 / 2 = 5 Шаг 2: S = 2, X = 5, i = 2 S = 2 + 2 * 2 = 6, X = 5 * 6 = 30 Шаг 3: S = 6, X = 30, i = 3 S = 6 + 2 * 3 = 12, X = 30 / 2 = 15 Шаг 4: S > X (12 > 15), выполняется S := Dec(S) (S = 11) Шаг 5: X = Inc(X) (X = 16) Шаг 6: Вывод на экран "X=16" Шаг 7: Вывод на экран "S=11"

Ответ для задачи №3: После выполнения программы значение переменной X будет равно 16, а значение переменной S будет равно 11.