10 класс

1. В программе используется одномерный целочисленный массив A с индексами от 0 до 9. Значения элементов равны 3, 0, 4, 6, 5, 1, 8, 2, 9, 7 соответственно, т. е. A[0] = 3, A[1] = 0 и т. д. Определите значение переменной c после выполнения следующего фрагмента этой программы (записанного ниже на разных языках программирования)

Паскаль

c := 0; for i := 1 to 9 do     if A[i-1] > A[i] then     begin         c := c + 1;         t := A[i];         A[i] := A[i-1];          A[i-1] := t;     end;

2. Значения двумерного массива задаются с помощью вложенного оператора цикла в представленном фрагменте программы:

Паскаль

for n:= 1 to 5 do     for k:=1 to 5 do begin         B[n,k]:= n + k;     end;

Чему будет равно значение B[2,4]?

3. Значения двух массивов A[1..100] и B[1..100] задаются с помощью следующего фрагмента программы:

Паскаль

for n : = 1 to 100     do A[n] : = n - 10; for n : = 1 to 100 do begin     B[n]:= A[n]*n; end;

Сколько элементов массива B будут иметь положительные значения?

Примечание. Нуль является ни положительным, ни отрицательным числом.

4. В программе описан одномерный целочисленный массив с индексами от 0 до 12. Ниже представлен записанный на разных языках программирования фрагмент одной и той же программы, обрабатывающей данный массив:

Паскаль

s := 0; n := 12; for i:=0 to n do begin     if A[n–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 после выполнения данной программы?

5. В программе используется одномерный целочисленный массив A с индексами от 0 до 9. Значения элементов равны 8, 4, 3, 0, 7, 2, 1, 5, 9, 6 соответственно, т.е. A[0] = 8, A[1] = 4 и т. д. Определите значение переменной s после выполнения следующего фрагмента программы (записанного ниже на разных языках программирования).

Паскаль

s := 0; for j := 0 to 9 do   if A[j] <= 4 then     s := j;

6. Значения элементов двухмерного массива A[1..10,1..10] сначала равны 0. Затем выполняется следующий фрагмент программы:

Паскаль

for i:=1 to 4 do     for j:=2 to 5 do begin         A[i,j] : = A[i,j]+4;         A[j,i] : = A[j,i]+5;     end;

Сколько элементов массива будут равны 9?

7. В программе используется одномерный целочисленный массив A с индексами от 0 до 9. Значения элементов равны 4, 7, 3, 8, 5, 0, 1, 2, 9, 6 соответственно, т.е. A[0] = 4, A[1] = 7 и т.д.

Определите значение переменной c после выполнения следующего фрагмента этой программы (записанного ниже на пяти языках программирования).

Паскаль

c := 0;  for i := 1 to 9 do     if A[i] < A[0] then     begin         c := c + 1;         t := A[i];         A[i] := A[0];         A[0] := t;     end;

8. Ниже представлен записанный на разных языках программирования фрагмент одной и той же программы. В программе описан одномерный целочисленный массив A, в представленном фрагменте программы обрабатываются элементы массива с индексами от 1 до 10.

Паскаль

s:=0; n:=10; for i:= 2 to n do begin     s:=s+A[i]*A[i]-A[i-1]*A[i-1]; end;

В начале выполнения этого фрагмента в массиве находились числа 1, 11, 22, 33, 44, 55, 66, 77, 88, 99, т. е. A[1]=1, A[2]=11 и т.д. Чему будет равно значение переменной s после выполнения данного фрагмента?

9. Представленный ниже на пяти языках программирования фрагмент программы обрабатывает элементы одномерного целочисленного массива A с индексами от 0 до 9. Перед началом выполнения данного фрагмента эти элементы массива имели значения 3, 1, 1, 5, 2, 9, 4, 3, 2, 1 (т. е. A[0] = 3, A[1] = 1, …, A[9] = 1). Определите значение переменной s после выполнения фрагмента.

Паскаль

N := 10; s := 0; for i:=1 to N-1 do begin     if A[i-1] > 2*A[i] then begin         A[i] := 2*A[i];         s := s + A[i];     end; end;

10. Ниже представлен записанный на разных языках программирования фрагмент одной и той же программы. В программе описан одномерный целочисленный массив A; в представленном фрагменте обрабатываются элементы массива с индексами от 1 до 10.

Паскаль

n := 10; d := 6; for j:=1 to d do begin   s := A[1];   for i:=1 to n-1 do begin     A[i] := A[i+1];   end;   A[10] := s; end;

Перед началом выполнения программы эти элементы массива имели значения 0, 1, 2, 3, 4, 5, 4, 3, 2, 1 (то есть A[1] = 0; A[2] = 1; …; A[10] = 1).

Значение какого из этих элементов массива будет наибольшим после выполнения фрагмента программы? В ответе укажите индекс элемента – число от 1 до 10.