Работа 3.6 Упр.16 ГДЗ Семакин 10 класс (Информатика)

Задача

Рассмотрим вариант решения задания из учебника Семакин, Хеннер, Шеина 10 класс, Бином: 16. Дан массив целых чисел. Найти в этом массиве минимальный элемент m и максимальный элемент М. Получить в порядке возрастания все целые числа из интервала (m; М), которые не входят в данный массив. *Цитирирование задания со ссылкой на учебник производится исключительно в учебных целях для лучшего понимания разбора решения задания. 10 semakin10 pract/3-6/16 98

Подробный ответ

Сначала находим в массиве минимальный и максимальный элементы. Затем перебираем все целые числа из интервала $$\left(m; M\right)$$, то есть от $$m+1$$ до $$M-1$$, и проверяем, встречается ли каждое из них в массиве. Если число в массив не входит, выводим его.

const n=10;
var
  a: array[1..n] of integer;
  i, j, max, min: integer;
  flag: boolean;
BEGIN
  randomize;
  for i:=1 to n do
  begin
    a[i]:=random(50);
    write(a[i], ‘ ‘);
  end;
  writeln;
  max:=a[1];
  for i:=1 to n do
    if a[i]>max then max:=a[i];
  writeln;
  write(‘maximalnii el-t massiva: ‘, max);
  min:=a[1];
  for i:=1 to n do
    if a[i]<min then min:=a[i];
  writeln;
  write(‘minimalnii el-t massiva: ‘, min);
  writeln;
  write(‘chisla, ne vhodyashie v diapazon: ‘);
  for i:=min+1 to max-1 do
  begin
    flag:=false;
    for j:=1 to n do
      if a[j]=i then
      begin
        flag:=true;
        break;
      end;
    if flag=false then write(i, ‘ ‘);
  end;
END.