Question

Помогите с задачками плз 1) В программе описан одномерный целочисленный массив с индексами от 0 до 100. Ниже представлен фрагмент программы, обрабатывающей данный массив: n:= 100; for i:=0 to 100 do A[i]:=i; for i:=1 to 100 do begin A[i]:= A[i]-A[i-1]; end; s:=A[90]; Укажите значение, которое после выполнения указанного фрагмента программы будет записано в переменную s. 1) 0 2) 30 3) 45 4) 550 2) В программе описан одномерный целочисленный массив с индексами от 0 до 12. Ниже представлен фрагмент программы, обрабатывающей данный массив: s := 0; n := 12; for i:=0 to 12 do begin if A[12–i]–A[i] = A[i] then s:=s+3*A[i]; end; В начале выполнения этого фрагмента в массиве находились числа 0, 2, 4, 6, 8, 10, 12, 14, 16, 18, 20, 22, 24 т.е. A[0] = 0, A[1] = 2 и т. д. Чему будет равно значение переменной s после выполнения данной программы? 1) 12 2) 18 3) 24 4) 156 3) В программе описан одномерный целочисленный массив с индексами от 0 до 10. Ниже представлен фрагмент программы, обрабатывающей данный массив: n := 10; for i:=0 to 10 do begin K := A[i]; A[K] := 0; end; В начале выполнения этого фрагмента в массиве находились числа 10, 9, 8, 7, 6, 5, 4, 3, 2, 1, 0, т. е. A[0] = 10, A[1] = 9 и т. д. Сколько элементов массива после выполнения программы будут иметь ненулевые значения? 1) 5 2) 2 3) 3 4) 4

Answer 1

В номере 1-ответ 3
В номере 2-ответ 4
В номере 3-ответ 1
Удачи))

Answer 2

Давайте разберемся с каждой из задач.

Задача 1:

n := 100;
for i := 0 to 100 do
  A[i] := i;
for i := 1 to 100 do
  A[i] := A[i] - A[i-1];
s := A[90];

В этой программе создается массив `A` размером 101 элемент, заполненный значениями от 0 до 100. Затем каждый элемент массива, начиная с первого, уменьшается на значение предыдущего элемента. В конце в переменную `s` записывается значение элемента с индексом 90.

Выполним пошаговый анализ: 1. `A[1] := A[1] - A[0]` (1 - 0) = 1 2. `A[2] := A[2] - A[1]` (2 - 1) = 1 3. `A[3] := A[3] - A[2]` (3 - 1) = 2 4. ... и так далее.

Таким образом, после выполнения программы `A[90]` будет равно 90 - 89 = 1.

Ответ: 1.

Задача 2:

s := 0;
n := 12;
for i := 0 to 12 do
begin
  if A[12 - i] - A[i] = A[i] then
    s := s + 3 * A[i];
end;

В начале выполнения программы в массиве находятся числа от 0 до 24 (A[0] = 0, A[1] = 2, ..., A[12] = 24). Затем программа проверяет условие `A[12 - i] - A[i] = A[i]` и, если оно выполняется, увеличивает значение переменной `s` на 3 * A[i].

Выполним пошаговый анализ: 1. `A[12] - A[0] = 24 - 0 = 24`, не выполняется. 2. `A[11] - A[1] = 22 - 2 = 20`, не выполняется. 3. `A[10] - A[2] = 20 - 4 = 16`, не выполняется. 4. ...

Таким образом, ни одно из условий не выполняется, и значение переменной `s` остается равным 0.

Ответ: 0.

Задача 3:

n := 10;
for i := 0 to 10 do
begin
  K := A[i];
  A[K] := A[K] + 0;
end;

В начале выполнения программы в массиве находятся числа от 0 до 10 (A[0] = 10, A[1] = 9, ..., A[10] = 0). Затем каждый элемент массива обнуляется по индексу, который равен значению этого элемента.

Выполним пошаговый анализ: 1. `A[10] := A[10] + 0` (A[10] = 0) - элемент с индексом 10 обнуляется. 2. `A[9] := A[9] + 0` (A[9] = 0) - элемент с индексом 9 обнуляется. 3. `A[8] := A[8] + 0` (A[8] = 0) - элемент с индексом 8 обнуляется. 4. ...

Таким образом, после выполнения программы 5 элементов массива будут иметь ненулевые значения (A[0] до A[5]).

Ответ: 6.