ЯЗЫКИ ПИТОН И С++ Обратное число
В этой задаче нужно ответить на 1≤t≤105 за Каждый за состоит из двух целых чисел 2≤p≤109 и 0
Входные данные
В первой строке дано целое число t — количество за
В следующих t строках даны по два числа pi и ai, i=1,…,t.
Выходные данные
Выведите t целых чисел (каждое число в отдельной строке) — ответы на за
Примеры
Ввод
4
5 1
5 2
5 3
5 4
Вывод
1
3
2
4
type
mas = array[1..n] of integer;
procedure p(a: mas; k: integer);
begin
if k <= n then
begin
if a[k] < 0 then write(a[k]:4);
p(a, k+1);
if a[n-k+1] > 0 then write(a[n-k+1]:4);
end
end;
var
a: mas; i: integer;
begin
randomize;
writeln('Последовательность');
for i := 1 to n do
begin
a[i] := random(21)+1;
if random(2)=1 then a[i]:=-a[i];
write(a[i]:4);
end;
writeln;
writeln('Преобразованная последовательность');
p(a, 1);
end.
Пример:
Последовательность
20 8 -9 15 -1 16 -9 -12 7 2
Преобразованная последовательность
-9 -1 -9 -12 20 8 15 16 7 2