В результате выполнения программы на Паскале, фрагмент которой приведен ниже, в переменной будет находиться:

… j:=0; m:=1; for i:=1 to n do begin read (x[i]); if x[i] mod 3<>0 then begin j:=j+1; y[j]:=i; end; end; for i:=1 to j do m:=m*x[y[i]]; …

Правильный ответ:

произведение элементов массива , не кратных трем

произведение элементов массива , на которые указывают элементы массива

произведение каждого третьего элемента массива

произведение элементов массива , на которые указывает каждый третий элемент массива

• # Для получения переноса в соседний разряд в результате арифметических операций с "цифрами", хранящимися в элементах массива (при работе со "сверхбольшими" числами) используют арифметическую операцию:
• # В результате выполнения программы на Паскале, фрагмент которой приведен ниже, переменная будет содержать: … n:=8; k:=n div 2; for i:=1 to n do begin x[i]:=i; j:=i div 2 + 1; y[j]:=j*2; end; for i:=1 to k do s:=s+x[y[i]]; …
• # Ниже приведен фрагмент программы … for i:=(n div 2 + 1) to n do for j:=??? x[i,j]:=1; … выполнение которой приведет к такому заполнению квадратного массива: \begin{matrix} 0&0&0&0&0&0&0&0&0\\ 0&0&0&0&0&0&0&0&0\\ 0&0&0&0&0&0&0&0&0\\ 0&0&0&0&0&0&0&0&0\\ 0&0&0&0&1&0&0&0&0\\ 0&0&0&1&1&1&0&0&0\\ 0&0&1&1&1&1&1&0&0\\ 0&1&1&1&1&1&1&1&0\\ 1&1&1&1&1&1&1&1&1 \end{matrix} Укажите, что должно стоять вместо вопросительных знаков в заголовке внутреннего цикла:
• # Приведенный ниже фрагмент программы на Паскале реализует алгоритм заполнения Арифметического квадрата. … for i:=1 to n do begin a[i,1]:=1; a[1,i]:=1; end; for i:=1 to n do for j:=1 to n do a[i,j]:=a[i-1,j]+a[i,j-1]; … Найдите в нем ошибку:
• # В каком направлении идет заполнение двумерного массива в 3-ем вложенном цикле по i, в результате выполнения программы на Паскале, фрагмент которой приведен ниже: … x:=1; for k:=1 to n div 2 do begin for i:=k to n-k do begin a[k,i]:=x; x:=x+1; end; for i:=k to n-k do begin a[i,n-k+1]:=x; x:=x+1; end; for i:=k to n-k do begin a[n-k+1,n-i+1]:=x; x:=x+1; end; for i:=k to n-k do begin a[n-i+1,k]:=x; x:=x+1; end; end; …