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

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

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

Типовой алгоритм поиска максимального и минимльного элемента двумерного массива на Паскале, фрагмент которого приведен ниже, содержит ошибку. Найдите ее:

…m1:=x[1,1]; m2:=x[1,1];for i:=1 to n dofor j:=1 to m doif x[i,j]<m1 then m1:=x[i,j]else m2:=x[i,j];…

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

Варианты ответа
неверно:
m1:=x[1,1]; m2:=x[1,1]; Верно: m1:=0; m2:=1000;
во фрагменте программы нет ошибок
неверно:
 ...else m2:=x[i,j]. Верно: if x[i,j]>m1 then m1:=x[i,j]; if x[i,j]<m2 then m2:=x[i,j];
(Верный ответ)
неверно:
…m1:=x[i,j]… …m2:=x[i,j]. Верно: …x[i,j]:=m1… …x[i,j]:=m2.
Похожие вопросы

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

…n:=5; x[2,3]:=5; x[4,1]:=1; max:=x[1,1]; min:=x[1,1];for i:=1 to n dofor j:=1 to n doif x[i,j]>max then max:=x[i,j]else min:=x[i,j];writeln (max, ' ', min);…

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

…for i:=1 to n dofor j:=1 to m doif ? then writeln (i,j);…

Программа на Паскале, фрагмент которой приведен ниже, выводит…

…n:=3; y:=-1;for i:=1 to n dofor j:=1 to n do x[i,j]:=y*(-2); y:=x[i,j];for i:=1 to n dofor j:=1 to n doif (x[i,j]>0) and (i*j mod 2 =0) then writeln (i+j);…

Программа на Паскале, фрагмент которой приведен ниже, выводит…

…for i:=1 to n dofor j:=1 to m doif (x[i,j]>0) and (i*j mod 2 =0) then writeln (i,j);…

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

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

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

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

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

Какие значения примут элементы первой строки двумерного массива, размерностью 5x5, в результате выполнения программы на Паскале, фрагмент которй приведен ниже (введите числа через пробел)

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

Какие значения примут элементы последней строки двумерного массива, размерностью 4x4, в результате выполнения программы на Паскале, фрагмент которй приведен ниже (введите числа через пробел)

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