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

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

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

В результате выполнения программы на Паскале, фрагмент которой приведен ниже, в переменной 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…

(Ответ необходимо ввести в поле ввода.)

Варианты ответа
Похожие вопросы

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

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

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

…for i:=1 to 4 dofor j:=1 to 5 do x[i,j]:=j;…

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

…for i:=1 to 4 dofor j:=1 to 5 do x[i,j]:=i;…

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

…for j:=1 to 4 dofor i:=1 to 5 do x[i,j]:=i;…

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

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

В результате выполнения программы на Паскале, фрагмент которой приведен ниже, в переменной 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, 2, 3\}. На печать выйдет:

… for i:=1 to n dofor j:=1 to n do if i<>j then write (A[i], A[j]);…

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

… for i:=1 to n dofor j:=1 to n do writeln (A[i], A[j]); …