Объединение последовательностей
Даны две бесконечных возрастающих последовательности чисел
A
A
и
B
B
.
i
i
-ый член последовательности
A
A
равен
i
2
i2
.
i
i
-ый член последовательности
B
B
равен
i
3
i3
.
Требуется найти
C
x
Cx
, где
C
C
— возрастающая последовательность, полученная при объединении последовательностей
A
A
и
B
B
. Если существует некоторое число, которое встречается и в последовательности
A,
A,
и в последовательности
B
B
, то в последовательность
C
C
это число попадает в единственном экземпляре.
Входные данные
В единственной строке входных данных дано натуральное число
x(1≤x≤
10
6
)
x(1≤x≤106)
.
Выходные данные
Выведите дам максимум

1)Графический редактор–это программа, предназначенная специально для рисования и редактирования изображений. Точнее, программа позволяющая вам создавать настоящие шедевры живописи прямо на вашем компьютере, или редактировать уже за ранее готовые фотографии и изображения (простой пример возможностей редактора — убрать распространенный «эффект красных глаз»).
2)Растр — изображение, построенное из отдельных элементов (точек), как правило, расположенных регулярно. В большинстве приложений компьютерной графики, растровое изображение представляется двумерным массивом точек, цвет и яркость каждой из которых задаются независимо.
Пиксел — это наименьшая единица растрового изображения, получаемого с графических систем вывода информации (компьютерные мониторы, принтеры и т. д.)
4)Графический примитив - простейший геометрический объект, отображаемый на экране дисплея или на рабочем поле графопостроителя: точка, отрезок прямой, дуга окружности или эллипса, прямоугольник и т.п.
5)Векторная графика состоит из точек линий квадратов. Качество не ухудшается при увеличении. Используется в больших плакатах, гербах...
6)Качество растрового изображения зависит от размера изображения (количества пикселей по горизонтали и вертикали) и количества цветов, которые можно задать для каждого пикселя.
7)Растровая графика позволяет создать практически любой рисунок, вне зависимости от сложности, в отличие, например, от векторной, где невозможно точно передать эффект перехода от одного цвета к другому без потерь в размере файла.
Распространённость — растровая графика используется сейчас практически везде: от маленьких значков до плакатов.
Высокая скорость обработки сложных изображений, если не нужно масштабирование.
Растровое представление изображения естественно для большинства устройств ввода-вывода графической информации, таких как мониторы (за исключением векторных устройств вывода), матричные и струйные принтеры, цифровые фотоаппараты, сканеры, а также сотовые телефоны.

1) 
Program asd;
USES crt;
Const n=10;
var A:array[1..n] of integer;
i,s,k,k1:integer;
BEGIN
Clrscr;
For i:=1 to n do
 begin 
A[i]:=random(10); 
Write(A[i]:4); 
end;       
Writeln;
 Writeln('Введите число: '); 
Readln(s); 
For i:=1 to n do 
 begin   
If A[i]=s then k:=k+1; 
end; 
Writeln('Число  ',s,', его кол-во в массиве:  ',k,' шт.');
END.
2)
Program asd;
USES crt;
Const n=10;
var A:array[1..n] of integer;
 i,min,mini,max,maxi:integer;
BEGIN
Clrscr; 
For i:=1 to n do 
 begin 
A[i]:=Random(20); 
 Write(A[i]:4);
  end;
  Writeln; 
max:=A[1]; 
min:=A[1]; 
For i:=1 to n do 
 begin 
 if A[i]>max then 
 begin 
 maxi:=i; 
 max:=A[i];   
end; 
  if A[i]<min then
 begin   
mini:=i; 
 min:=A[i]; 
  end; 
end; 
Writeln('Максимальное число: ',max,'. Индекс: ',maxi);   
Writeln('Минимальное число: ',min,'. Индекс: ',mini );
END.