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

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

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

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

…d:=0;for j:=1 to n dobeginm[j]:=x[1,j];for i:=1 to n dobeginif x[i,j]<m[j] then m[j]:=x[i,j];end;d:=d+m[j];	end…

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

Варианты ответа
сумма максимальных элементов каждого стролбца квадратного массива(Верный ответ)
сумма максимальных элементов каждой строки квадратного массива
сумма всех элементов массива
сумма минимальных элементов каждой строки квадратного массива
Похожие вопросы

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

…d:=0;for j:=1 to n dobeginm[j]:=x[1,j];for i:=1 to n dobeginif x[i,j]>m[j] then m[j]:=x[i,j];end;d:=d+m[j]; end…

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

…s:=0;for i:=1 to n dofor j:=1 to n doif (i>n-j+1) then s:=s+x[i,j];…

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

…s:=0;for i:=1 to n dofor j:=1 to n doif (i<=n-j+1) then s:=s+x[i,j];…

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

…d:=0; n:=3;for j:=1 to n dofor i:=1 to n do x[i,j]:=i+j;for j:=1 to n dobeginm[j]:=x[1,j];for i:=1 to n dobeginif x[i,j]>m[j] then m[j]:=x[i,j];end;d:=d+m[j];	end…

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

…max:=x[1,1]; min:=x[1,1];for i:=1 to n dofor j:=1 to m doif x[i,j]>max then max:=x[i,j]else min:=x[i,j];…

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

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

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

…for k:=1 to (n div 2 +1) do for i:=k to n-k+1 do  for j:=k to n-k+1 do a[i,j]:= k;…

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

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

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

… x:=1;for j:=1 to n do for i:=1 to j do  begin a [i, j-i+1]:=x; x:=x+1;	  end; …

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

…x:=1;for i:=1 to n do for j:=1 to n do  begin  if i mod 2=0 then a[i,n-j+1]:=x     else a[i,j]:=x;  x:=x+1;   end;…