База ответов ИНТУИТ

Решение олимпиадных задач по информатике

<<- Назад к вопросам

В каком направлении идет заполнение двумерного массива в 2-ом вложенном цикле по 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; …

(Отметьте один правильный вариант ответа.)

Варианты ответа
в строку слева направо
в столбец сверху вниз(Верный ответ)
в строку справа налево
в столбец снизу вверх
Похожие вопросы

В каком направлении идет заполнение двумерного массива в 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; …

В каком направлении идет заполнение двумерного массива в 1-ом вложенном цикле по 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; …

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

…j:=0; m:=1; n:=10;for i:=1 to n do x[i]:=i;for i:=1 to n do  begin 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]]; …

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

… j:=1; k:=0; for i:=1 to n do  if x[i] mod 2=0 then    begin	y[j]:=i; j:=j+1; k:=k+1;	end; for j:=k downto 2 do  for i:=1 to j-1 do   	if x[y[i]]>x[y[i+1]] then 	 begin	 z:=x[y[i]]; x[y[i]]:=x[y[i+1]]; x[y[i+1]]:=z;	 end;…

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

… j:=1; k:=0; for i:=1 to n do  if x[i] >0 then   begin   y[j]:=i; j:=j+1; k:=k+1;   end; for j:=k downto 2 do  for i:=1 to j-1 do   if x[y[i]]<x[y[i+1]] then 	begin	z:=x[y[i]]; x[y[i]]:=x[y[i+1]]; x[y[i+1]]:=z;	end;…

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

…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]]; …

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

…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]]; …

В результате выполнения программы на Паскале, фрагмент которой приведен ниже, в массив Х вводятся числа: 1, 8, 12, 3, 5, 4. Сумма элементов массива У будет равна:

…j:=1; k:=0; n:=6;for i:=1 to n do if x[i] mod 2=0 then  begin  y[j]:=i; j:=j+1;  end;…

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

…n:=5; j:=1; k:=0;for i:=1 to n do x[i]:=i;for i:=1 to n do if x[i] mod 2=0 then  begin  y[j]:=i; j:=j+1; k:=k+1;  end;for j:=k downto 2 do for i:=1 to j-1 do  if x[y[i]]>x[y[i+1]] then     begin	z:=x[y[i]]; x[y[i]]:=x[y[i+1]]; x[y[i+1]]:=z;	end;…

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

. . . n:=5;for i:=1 to n do  begin x[i]:=n-i+1; y[i]:=i; end;for j:=n downto 2 do  for i:=1 to j-1 do  if x[i]>x[i+1] then     begin	g:=x[i]; x[i]:= x[i+1]; x[i+1]:=g;	g:=y[i]; y[i]:= y[i+1]; y[i+1]:=g;	end;for i:=1 to n do write (x[i]+y[i]); . . .