20
путешествуя по миру, в одной из глубоких горных шахт ньют саламандер обнаружил неизвестный науке ранее вид нюхлей, отличающихся от обычных специфической формой усов. эти зверьки
обладали удивительным свойством: они жили под землей большими семьями и большую часть жизни проводили в спячке, просыпаясь по весне и засыпая снова в конце лета. найдя их, ньют пришёл
в неописуемый восторг и решил непременно забрать с собой несколько особей для дальнейшего их
изучения. к его счастью, на дворе стоял ноябрь, и поэтому все зверьки глубоко спали.
изучив внутренние помещения своего волшебного сундука, ньют обнаружил в нём квадратную грядку со стороной n. путем некоторых сложных вычислений он выяснил, что максимальное
количество нюхлей, которым будет комфортно одновременно спать в этой грядке, также равно n.
единственной проблемой для ньюта стал тот факт, что во время транспортировки кто-то из нюхлей может неожиданно проснуться. специфическая форма усов создавала телепатическую связь
между нюхлями из одной семьи, и поэтому если просыпается один нюхль, то просыпается и всё
семейство. чтобы избежать путаницы, волшебник решил отвести для каждого семейства минимальную по площади связную часть грядки такую, чтобы каждый нюхль занимал квадрат со стороной
1. напомним, что связной частью грядки называется такой набор клеток, что от любой его клетки
можно добраться до любой другой, перемещаясь каждый раз в соседнюю по стороне клетку и не
выходя за пределы этого набора.
проснувшись, нюхль сразу начинает копать грядку в одном из четырёх направлений, параллельных сторонам грядки. направление он выбирает абсолютно случайно. если вдруг нюхль из одного
семейства наткнётся на норку, изначально предназначенную для сна нюхля из другого семейства,
то между ними произойдёт конфликт, результатом которого станет разрушение всей грядки.
ньюту разместить всех нюхлей на грядке так, чтобы для каждого семейства была
отведена минимальная по площади связная часть грядки, и чтобы даже если все зверьки проснутся
и начнут копать, нюхли разных семейств ни в коем случае не натыкались на норки друг друга.
формат входных данных
первая строка входных данных содержит единственное число n — сторона грядки и количество
зверьков (1 ⩽ n ⩽ 10^5)
вторая строка содержит n чисел ai — семейство, к которому относится i-й зверёк (1 ⩽ ai ⩽ n).
формат выходных данных
выведите n строк, содержащих по два целых числа xi и yi — координаты того квадрата грядки,
в который следует положить i-го зверька.
гарантируется, что такое размещение нюхлей всегда существует.
пример
стандартный ввод
3
2 1 2
стандартный вывод
2 2
1 1
2 3
1)var
a:array[1..5]of integer;
i,n,s:integer;
begin
writeln('Введите кол-во элементов');
readln(n);
writeln('Введите число');
s:=0;
for i:=1 to n do begin
read(a[i]);
if a[i]>0 then s:=s+a[i]
end;
writeln('Сумма положительных элементов массива равна ', s)
end.
2)var
a:array[1..10]of integer;
i,n,P:integer;
begin
writeln('Введите число элементов');
readln(n);
writeln('Введите число');
P:=1;
for i:=1 to n do begin
read(a[i]);
if a[i] mod 6 = 0
then P:=P*a[i]
end;
writeln('Произведение элементов массива кратных 6 равна ',P)
end.
3)var
a:array[1..5]of integer;
n,i:integer;
begin
writeln('Введите кол-во элементов');
readln(n);
writeln('Введите число');
for i:=1 to n do begin
read(a[i]);
if a[i]>0 then begin
a[i]:=a[i]*3;
writeln('Новый элемент равен: ',a[i])
end;
if a[i]<=0 then begin
a[i]:=a[i]+5;
writeln('Новый элемент равен: ',a[i])
end;
end;
end.
Буду рад если отметишь мой ответ как лучший