Сканируется цветное изображение размером 15,24 на 15,24 см .
Разрешающая сканера —600 на 1200dpi, Глубина цвета— 32 бита . Какой информационный объем будет иметь полученный графический файл

Само собой, числа a1..an надо поместить в массив. если его упорядочить по возрастанию (или убыванию), то элементы с одинаковыми значениями окажутся рядом и их легко будет пропустить. var   a: array[1..n] of integer;   i,j,t: integer; begin   { инициализация массива }   randomize;   writeln('элементы массива');   for i : = 1 to n do   begin       a[i]: =random(10);       write(a[i]: 3);   end;   writeln;   { сортировка по возрастанию методом пузырька }   for i : = 1 to n-1 do       for j : = 1 to n-i do           if a[j] > a[j+1] then           begin t : = a[j]; a[j] : = a[j+1]; a[j+1] : = t end;   { вывод неповторяющихся значений }   writeln('уникальные значения элементов');   t: =a[1]; write(t: 3);   for i: =2 to n do       if a[i]< > t then begin t: =a[i]; write(t: 3) end;   writeln end. тестовое решение: элементы массива   9  6  1  6  1  4  5  9  1  2  6  7  7  6  1  7  7  8  0  8 уникальные значения элементов   0  1  2  4  5  6  7  8  9