Каков будет результат выполнения программы, если с клавиатуры вводится слово "Ротор":

var a:string; k,n,i: integer; begin readln (a); k:=0; n:=length(a); for i:=1 to n div 2 do if copy(a,i,1) <> copy(a,n-i+1,1) then k:=k+1; writeln (k); end.

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

• # В результате выполнения программы, фрагмент которой приведен ниже … n=5; for i:=n-1 downto 0 do write (n-i+1); … выводится ряд чисел:
• # Найдите ошибки в программе, реализующей алгоритм сортировки одномерного массива "Пузырьком", фрагмент которой приведен ниже: … for j:=2 to n do for i:=1 to j do if x[i]>x[i+1] then begin y:=x[i]; x[i]:= x[i+1]; x[i+1]:=y; end; …
• # Для сортировки различных частей одномерного массива, выбранных по определенному правилу (так, чтобы "невыбранные" элементы оставались стоять на своих местах), необходимо:
• # В результате выполнения программы на Паскале, фрагмент которой приведен ниже, двумерный массив будет заполнен так: … for j:=1 to 4 do for i:=1 to 5 do x[i,j]:=i; …
• # Какие значения примут элементы первой строки двумерного массива, размерностью 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; …