Створити запитання до теми алгоритми з повторенням​

1. 8

2. 18

3. 10

Объяснение:

Давай разберём высказывания. Они все построены по одному принципу. НЕ - это отрицание. Отрицание условия. Условиями являются знаки "больше", "равно", "меньше" и слова "чётное"-"нечётное".

1. В первом случае у нас отрицается знак "меньше" <, то есть находится ему противоположный. А противоположным является знак "больше или равно" >=. Соответственно, мы должны найти такое наименьшее число, которое больше или равно 7 и одновременно с этим является чётным. Логично, что это число 8.

2. Тот же самый принцип. Противоположностью знака "меньше или равно" будет являться знак "больше". Значит, мы ищем такое наибольшее число, которое больше 14 и одновременно с этим меньше или равно 18. Получаем, что ответ - 18.

3. Здесь отрицаются уже два условия. В первом случае получаем, что икс должен быть больше 6, а во втором - икс должен быть меньше 11. Нам нужно найти такое наибольшее число, которое удовлетворяет обоим этим условиям. Находим такое число - это 10.

//Pascal ABC.NET 3.1 сборка 1219

Type
 ty=array[1..60] of integer;

Var
 a,b,c:array[1..20] of integer;
 ar:ty;
 n,m,k,i:integer;

procedure quicksort(var a:ty; Lo,Hi: integer);

procedure sort(l,r: integer);
var
i,j,x,y: 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
     begin
      y:=a[i];
 a[i]:=a[j];
 a[j]:=y;
     end;
    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);
 for i:=1 to n do
 begin
  readln(a[i]);
  ar[i]:=a[i];
 end;
 readln(m);
 for i:=1 to m do
 begin
  readln(b[i]);
  ar[i+n]:=b[i];
 end;
 readln(k);
 for i:=1 to k do
 begin
  readln(c[i]);
  ar[i+n+m]:=c[i];
 end;
 quicksort(ar,1,n+m+k);
 writeln('Final array:');
 for i:=1 to n+m+k do
 write(ar[i]:4);
end.

Пример ввода:
3
1
2
3
3
1
2
3
3
1
2
3
Пример вывода:
Final array:
   1   1   1   2   2   2   3   3   3