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

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

Правильный ответ:

• # Каков будет результат выполнения программы, если с клавиатуры вводится слово "Ротор": 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, введенное с клавиатуры:
• # Результат работы программы на Паскале, фрагмент которой приведен ниже: … a:=100; n:=5; i:=0; while (a<>0) do begin i:=i+1; write (a mod n); a:=a div n; 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; …
• # В результате выполнения программы на Паскале, фрагмент которой приведен ниже, на экран выведутся: … 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]) …