Вкаталоге находятся файлы со следующими именами: omerta.doc chimera.dat chimera.doc izmeren.doc mesmer.docx k-mer-list.doc определите, по какой из масок будет выбрана указанная группа файлов: omerta.doc chimera.doc izmeren.doc k-mer-list.doc 1) *mer? *.d* 2) ? mer*.doc 3) *mer? .doc* 4) *? mer*? .do*

Ответ под номером 4. знак вопроса строго один символ звездочка какая- то последовательность символов

Program sport; const       m = 10; var       c: array [1..m] of integer;       i: integer;       n: real; begin       write('n=');       readln(n);             for i : = 1 to m do       begin               write('c[', i, ']=');               readln(c[i]);       end;             for i : = 1 to m do               if c[i] > n then                       write(i, ' '); end. тест: n=5 c[1]=1 c[2]=4 c[3]=7 c[4]=2 c[5]=5 c[6]=8 c[7]=3 c[8]=6 c[9]=9 c[10]=1 3 6 8 9

//pascal abc.net 3.1 сборка 1219 var   ar: array of integer;   i,n: integer;   procedure quicksort(var a: array of integer; lo,hi: integer); procedure sort(l,r: integer); var i,j,x: integer; begin i: =l;   j: =r;   x: =a[random(r-l+1)+l]; repeat while a[i]> x do i: =i+1;   while x> a[j] do j: =j-1;   if i< =j then     begin     if a[i]< a[j] then  swap(a[i],a[j]);     i: =i+1;   j: =j-1;   end;     until i> =j;   if l< j then sort(l,j);   if i< r then sort(i,r); end; begin;   randomize;   sort(lo,hi) end;   begin   readln(n);   setlength(ar,n);   n: =n-1;   writeln('array: ');   for i: =0 to n do   begin     ar[i]: =random(10);     write(ar[i]: 4);   end;   quicksort(ar,0,n);   writeln;   writeln('final array: ');   for i: =0 to n do   write(ar[i]: 4); end. пример ввода: 5 пример вывода: array:     8   7   5   9   4 final array:     9   8   7   5   4