Ответы к тесту/контрольной: Решение олимпиадных задач по информатике

Совершенное число - это…

В результате выполнения программы на Паскале, фрагмент которой приведен ниже, произойдет выборка элементов из исходного массива, соответствующая такому основному типу комбинаторных групп:...for i:=1 to n dofor j:=i to n do writeln (A[i], A[j]); …

В результате выполнения программы на Паскале, фрагмент которой приведен ниже, произойдет выборка элементов из исходного массива, соответствующая такому основному типу комбинаторных групп:...for i:=1 to n-1 dofor j:=i+1 to n do writeln (A[i], A[j]); …

Фрагменты программ на Паскале реализуют алгоритмы формирования таких комбинаторных групп, как:...for i:=1 to n-1 dofor j:=i+1 to n do writeln (A[i], A[j]); ...for i:=1 to n dofor j:=i to n do writeln (A[i], A[j]); …for i:=1 to n dofor j:=1 to n do if i<>j then writeln (A[i], A[j]);…for i:=1 to n dofor j:=1 to n do writeln (A[i], A[j]);

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

Приведенный ниже фрагмент программы на Паскале реализует алгоритм заполнения Арифметического квадрата. …for i:=1 to n dobegin a[i,1]:=i; a[1,i]:=i;end;for i:=2 to n do for j:=2 to n do a[i,j]:=a[i-1,j]+a[i,j-1];…Найдите в нем ошибку:

Какие шаги необходимо включить в словесный алгоритм для решения задачи: "В строке, содержащей арифметическое выражение проверить, правильно ли расставлены скобки" из предложенного набора:A. исходные данные вводим в массивB. массив Flag заполняется "1" (если имеющий такой же порядок элемент массива исходных данных соответствует началу события, связанного с этим данным), "-1" (соответствует окончанию события) C. сортируем массив исходных данных, одновременно переставляя элементы массива FlagD. суммируем элементы массива Flag. Анализируем сумму.

В результате выполнения программы на Паскале, фрагмент которой приведен ниже, массив Flag будет содержать:…readln (n);for i:=1 to n do a[i]:=i;for i:=2 to n div 2 do if flag[i]=0 then for j:=i+1 to n do if (a[j] mod a[i]=0) then flag[j]:=1;…

В результате выполнения программы на Паскале, фрагмент которой приведен ниже, буден найдено:…s:=0;for i:=1 to n dofor j:=1 to n doif (i<=n-j+1) then s:=s+x[i,j];…

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

Фрагмент программы на Паскале проверяет - совершенное ли число n, введенное с клавиатуры. Выберите все варианты, которые помогут исправить в нем ошибку:…for i:=1 to n do if n mod i=0 then k:=k+i;if k=n then writeln ('число совершенное')else writeln ('число несовершенное');…

Каков будет результат выполнения программы, если с клавиатуры вводится слово "Ротор":var a:string; k,n,i: integer;begin readln (a); k:=0; n:=length(a); for i:=1 to n do if copy(a,i,1) <> copy(a,n-i+1,1) then k:=1;writeln (k);end.

В результате выполнения программы, фрагмент которой приведен ниже…n=5;for i:=n-1 downto 0 do write (n-i+1);…выводится ряд чисел:

В результате выполнения программы, фрагмент которой приведен ниже…n=5;for i:=0 to n-1 do write (n-i+1);…выводится ряд чисел:

Метод двоичного перебора заключается в…

В результате выполнения программы, фрагмент которой приведен ниже, элементы одномерного массива примут значения … const n=10; k=5;… for i:=1 to n do a[i]:=i;for i:=k to (n-1) do a[i]:= a[i+1];…

Даны координаты n точек на плоскости. За исключением одной точки все остальные образуют выпуклый многоугольник (при этом координаты точек вводятся в порядке обхода вершин многоугольника. "Лишняя" точка вводится в любом месте). Как можно определить эту "лишнюю" точку?

Найдите ошибки в программе, реализующей алгоритм сортировки одномерного массива "Пузырьком", фрагмент которой приведен ниже:…for j:=2 to n do for i:=1 to j do if x[i]>x[i+1] then beginy:=x[i]; x[i]:= x[i+1]; x[i+1]:=y;end;…

В результате выполнения программы, фрагмент которой приведен ниже…n=5;for i:=n-1 downto 0 do write (n-i);…выводится ряд чисел:

В переменную n с клавиатуры вводится значение n=137. Предскажите результат работы программы (что выведется на экран):…k:=0;for i:=2 to n-1 do if n mod i=0 then k:=k+1;if k=2 then writeln ('простое')else writeln ('составное');…

В результате выполнения программы на Паскале, фрагмент которой приведен ниже, произойдет выборка элементов из исходного массива, соответствующая такому основному типу комбинаторных групп:…for i:=1 to n dofor j:=1 to n do writeln (A[i], A[j]);…

В результате выполнения программы на Паскале, фрагмент которой приведен ниже, произойдет выборка элементов из исходного массива, соответствующая размещениям с повторениями. Что нужно изменить в алгоритме, чтобы из набора выбираемых элементов исключить повторяющиеся:…for i:=1 to n dofor j:=1 to n do if i<>j then writeln (A[i], A[j]);…

Многоугольник задан координатами своих последовательных вершин. Внутренний угол одной из вершин многоугольника - тупой. Каким образом можно найти эту вершину?

Как определить существование треугольника, если известны его стороны?

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

Приведенный ниже фрагмент программы на Паскале реализует алгоритм заполнения Арифметического квадрата. …for i:=1 to n dobegin a[i,1]:=1; a[1,i]:=1;end;for i:=1 to n do for j:=1 to n do a[i,j]:=a[i-1,j]+a[i,j-1];…Найдите в нем ошибку:

Какие из ниже перечисленных особенностей имеют отношение к Арифметическому квадрату?

Какие шаги необходимо включить в словесный алгоритм для решения задачи: "N отрезков на координатной прямой заданы координатами своих концов. Определить количество связных областей" из предложенного набора:A. исходные данные вводим в массивB. массив Flag заполняется "1" (если элемент массива исходных данных соответствует началу события), "-1" (соответствует окончанию события) C. сортируем массив исходных данных, одновременно переставляя элементы массива FlagD. суммируем элементы массива Flag. Анализируем сумму.

Ниже приведен фрагмент программы, реализующий алгоритм решения задачи: "В картинной галерее работают сторожа. Для каждого сторожа известно время прихода на работу и время ухода. Определить, всегда ли галерея охраняется":…//заполнение массива a (временем прихода и ухода сторожа), массива flag ("1" и "-1")…//сортировка массива а с перестановкой элементов массива flag (в соответствии с перестанавливаемыми элементами массива а) …for i=1 to 2*n do begin s:=s+flag [i]; if s=0 then k:=k+1; end;if k=1 then writeln ('галерея всегда охранялась')else writeln ('галерея оставалась без охраны', k-1,'раз');Каков будет результат работы программы, если время ухода одного из сторожей совпадает с временем прихода его сменщика?

В решениях приведенных ниже задач:А."В строке, содержащей арифметическое выражение проверить, правильно ли расставлены скобки";В."В картинной галерее работают сторожа. Для каждого сторожа известно время прихода на работу и время ухода. Определить, всегда ли галерея охраняется";С."N отрезков на координатной прямой заданы координатами своих концов. Определить количество связных областей"используются типовые алгоритмы:

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

В решениях приведенных ниже задач:А."В строке, содержащей арифметическое выражение проверить, правильно ли расставлены скобки";В."В картинной галерее работают сторожа. Для каждого сторожа известно время прихода на работу и время ухода. Определить, всегда ли галерея охраняется";С."N отрезков на координатной прямой заданы координатами своих концов. Определить количество связных областей"элементы массива флажков, отмечающих наступление-окончание события, на этапе заполнения начальных значений примут такие значения:

В результате выполнения программы на Паскале, фрагмент которой приведен ниже, буден найдено:…s:=0;for i:=1 to n dofor j:=1 to n doif (i>n-j+1) then s:=s+x[i,j];…

Для сортировки различных частей одномерного массива, выбранных по определенному правилу (так, чтобы "невыбранные" элементы оставались стоять на своих местах), необходимо:

Приведенная программа на Паскале реализует алгоритм поразрядного умножения числа на число от 0 до 9, вводимых с клавиатуры приведена с ошибкой. Найдите ее.const m=…;var a, rez: array [1..m] of byte; i, n, x, k: integer; stroka: string;begin readln (stroka); readln (x); n:= length (stroka); for i:=1 to n do val (copy(stroka, i, 1), a[i], k); for i:=1 to n do rez[i]:= a[i] * x; for i:=n downto 2 do begin rez[i-1]:= rez[i-1]+rez[i] mod 10; rez[i]:= rez[i] div 10; end for i:=1 to n do write (rez[i]);end.

При совершении арифметических операций с "цифрами", хранящимися в строковых переменных используют процедуру (функцию) преобразования данных:

Приведенная программа на Паскале позволяет …var a, b, s, x: integer;beginreadln (a); readln (b); s:=0;while a<>0 dobeginx:=a mod b; s:=s*10 +x; a:=a div b;end;writeln (s);end.

Назначение программы на Паскале…var a: string;b, i, st, n, s, x, k:integer;beginreadln (a); readln(b); n:=length(a); s:=0; st:=1;for i:=1 to n dobeginval (copy(a,n-i+1,1),x,k); s:=s+x*st; st:=st*b;end;writeln (s);end.

В приведенной ниже программе организован ввод предложения и вывод…var a: array [1..20] of string;s: string;i, n, j,k:integer;beginreadln (s); n:=length(s); j:=1;for i:=1 to n doif copy(s,i,1)=' ' then j:=j+1else a[j]:=a[j]+copy(s,i,1);for i:=1 to j do write (a[i]);end.

В результате выполнения программы, фрагмент которой приведен ниже, элементы одномерного массива примут значения … const n=10; k=5;var a: array [1..n+1] of integer;…for i:=1 to n do a[i]:=i;for i:=k to n do a[i+1]:=a[i];a[k]:=0;…

Определите результат работы фрагмента программы на Паскале:…for i:=1 to 10 do a[i]:=i-1;z:=0; d:=1; h:=1;for i:=1 to 10 do beginif i mod 2 <> 0 then z:=z+a[i]; if a[i] mod 3 = 0 then d:=d*a[i];if a[i] <= 0 then h:=h+1; end; write (z, ' ', d, ' ', h);…

Укажите, какой фрагмент программы на Паскале проверяет - совершенное ли число n, введенное с клавиатуры:

Фрагмент программы на Паскале проверяет - простое ли число n, введенное с клавиатуры, он не правильный. Укажите возможные правильные варианты. …...k:=0;for i:=1 to n-1 do if n mod i=0 then k:=k+1;if k=2 then writeln ('число простое')else writeln ('число составное');…

Каков будет результат выполнения программы на Паскале, если с клавиатуры вводится слово "Ротор":var a:string; k,n,i: integer;begin readln (a); k:=0; n:=length(a); for i:=1 to n do if copy(a,i,1) <> copy(a,n-i+1,1) then k:=k+1;writeln (k);end.

В результате выполнения программы, фрагмент которой приведен ниже…n:=5;for i:=n downto 1 do write (n-i+1);…выводится ряд чисел:

В результате выполнения программы, фрагмент которой приведен ниже…n=5;for i:=0 to n-1 do write (n-i);…выводится ряд чисел:

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

Приведенный ниже фрагмент программы на Паскале реализует алгоритм заполнения Арифметического квадрата. …for i:=1 to n do for j:=1 to n do begin a[i,j]:=1; a[i,j]:=1; end;for i:=2 to n do for j:=2 to n do a[i,j]:=a[i-1,j]+a[i,j-1];…Что в нем стоит изменить?

В результате выполнения программы, фрагмент которой приведен ниже…n=5;for i:=1 to n do write (n-i+1);…выводится ряд чисел:

Использование дополнительного массива флажков ("отмечающих" выбранные элементы в соответствующих флажкам позициях исходного массива) предполагает, что:

Треугольник на плоскости задан координатами своих вершин. Каким образом можно определить, прямоугольный ли это треугольник?

Предположим, что есть программа на Паскале, реализующая заполнение Арифметического квадрата порядка nxn. В какой части этого массива находится "Треугольник Паскаля"?

Определите результат работы фрагмента программы на Паскале:…for i:=1 to 10 do a[i]:=i-1;z:=0; d:=0; h=1;for i:=1 to 10 do beginif i mod 2 <> 0 then z:=z+a[i]; if a[i] mod 3 = 0 then d:=d*a[i];if a[i] <= 0 then h:=h+1; end; write (z, ' ', d, ' ', h);…

Назначение программы на Паскале, фрагмент которой приведен ниже:…readln (x1, y1); readln (x2, y2); readln (x3, y3);a:= sqrt (sqr(x1-x2)+sqr(y1-y2));b:= sqrt (sqr(x2-x3)+sqr(y2-y3));c:= sqrt (sqr(x3-x1)+sqr(y3-y1));p:=(a+b+c) / 2;writeln (sqrt (p*(p-a)*(p-b)*(p-c)));…

В результате выполнения программы на Паскале, фрагмент которой приведен ниже, на экран выведутся:…readln (n);for i:=1 to n do a[i]:=i;for i:=2 to n div 2 do if flag[i]=0 then for j:=i+1 to n do if (a[j] mod a[i]=0) then flag[j]:=1;for i:=2 to n do if flag[i]=0 then writeln (a[i])…

Программа на Паскале, фрагмент которой приведен ниже, выводит индексы положительных элементов двумерного массива, произведение индексов которых четно. Какое логическое выражение вместо вопросительного знака в ветвлении необходимо указать:…for i:=1 to n dofor j:=1 to m doif ? then writeln (i,j);…