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

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

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

В результате выполнения программы на Паскале, фрагмент которой приведен ниже, в массив Х вводятся числа: 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 натуральных чисел. Массив У будет содержать:
…j:=0; k:=0; n:=9;for i:=1 to n do x[i]:=i;for i:=1 to n do  if x[i] mod 2<>0 then    begin	j:=j+1; y[j]:=i;	end;…

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

. . . for i:=1 to n do  begin readln (x[i]); 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	m:=x[i]; x[i]:= x[i+1]; x[i+1]:=m;	g:=y[i]; y[i]:= y[i+1]; y[i+1]:=g;	end; . . . 

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

. . . for i:=1 to n do  begin readln (x[i]); 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	m:=x[i]; x[i]:= x[i+1]; x[i+1]:=m;	g:=y[i]; y[i]:= y[i+1]; y[i+1]:=g;	end; . . . 

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

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

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

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

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

В результате выполнения программы на Паскале, фрагмент которой приведен ниже, произойдет выборка элементов из исходного массива А={1, 2, 3}.

… for i:=1 to n dofor j:=i to n do writeln (A[i], A[j]); …
Введите результат вывода программы без пробелов:

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

…for i:=1 to 10 do begin  a[i]:=i;  flag[i]:=0;endfor i:=2 to 10 div 2 do  if flag[i]=0 then  for j:=i+1 to 10 do   if (a[j] mod a[i]=0) then flag[j]:=1;…