Имя входного файла: стандартный ввод
имя выходного файла: стандартный вывод
ограничение по времени: 2 секунды
ограничение по памяти: 256 мегабайт
— ты меня заждалась, дорогая? извини,
меня задержал ньютон.
— кто это?
— . умнейший человек. я
непременно тебя с ним познакомлю.
диалог между карлом и мартой, из
сценария фильма «тот самый
мюнхгаузен»
барон мюнхгаузен весьма трепетно относится к своему распорядку дня. сначала он составляет
предварительную версию распорядка на несколько дней вперёд. в настоящий момент он включил в
предварительную версию n пунктов, определив для каждого из них день, в который он планирует
выполнить этот пункт.
затем для каждого из пунктов барон определяет наиболее ранний день, в который он сможет
подготовиться к выполнению этого пункта. нужно сказать, что на подготовку к выполнению любого
пункта мюнхгаузену требуется ровно один день, и в этот день он не будет заниматься подготовкой
ни к какому другому пункту. подготовка может быть проведена в любой из допустимых дней, но
не может быть проведена в день выполнения пункта. заметим, что выполнять какие-либо пункты
распорядка дня в день подготовки к некоторому другому пункту мюнхгаузен вполне может — если
ранее подготовился к этим каким-либо пунктам.
если бы всё зависело только от мюнхгаузена, он успел бы выполнить все пункты, включённые в
предварительную версию распорядка. но, увы, это далеко не так. вот, к примеру, софокл пригласил
его в гости, предлагая обсудить новую театральную постановку. однако посмотреть эту постановку
раньше её премьеры не получится.
так что при формировании окончательной версии распорядка мюнхгазуену приходится вычёркивать какие-то пункты, чтобы успеть выполнить все остальные. а выполнить он хочет как можно
больше пунктов. ваша — определить максимально возможное количество пунктов, которые
сможет выполнить барон, а также определить, какие это могут быть пункты.
формат входных данных
в первой строке содержится целое число n (1 6 n 6 3 · 105
) — количество пунктов в предварительной версии распорядка.
во второй строке содержатся целые числа d1, d2, . . , dn (2 6 dj 6 109
, j = 1, 2, . . , n), dj — день,
в который должен быть выполнен пункт #j.
в третьей строке содержатся целые числа p1, p2, . . , pn (1 6 pj < dj j = 1, 2, . . , n), pj — наиболее
ранний день, в который мюнхгаузен может подготовиться к выполнению пункта #j.
формат выходных данных
в первой строке выведите целое число m — максимально возможное количество пунктов, которое
сможет выполнить барон мюнхгаузен.
во второй строке выведите m целых чисел — номера пунктов, которые он сможет выполнить, в
том порядке, в котором он будет их выполнять.
если существует несколько вариантов ответа, выведите любой из них.
Приведём все степени к основанию 2
2^3702-2^468+2^1620-108
-108 можно представить как -128 + 16 + 4
2^3702-2^468+2^1620-2^7 + 2^4 + 2^2
Теперь выстраиваем степени в порядке убывания:
2^3702+2^1620-2^468-2^7 + 2^4 + 2^2
В выражении два вычитания подряд, избавимся от этого, заменив -2^468 на -2^469 + 2^468
2^3702+2^1620 -2^469+2^468-2^7 + 2^4 + 2^2
2^3702 - 1 единица
2^4 - 1 единица
2^2 - 1 единица
Количество единиц в вычитаниях будет равно разнице степеней. Например 1000000-100=1111
2^1620 -2^469 - количеств единиц 1620-469 = 1151
2^468-2^7 - количество единиц 468-7 = 461
Общее количество единиц равно 3+1151+461 = 1615
//Pascal ABC.NET v3.0 сборка 1111
//1
Var
a,p,s:real;
begin
readln(a);
p:=a*4;
s:=a*a;
writeln('P=',p);
writeln('S=',s);
end.
//2
Var
a,b:integer;
begin
read(a,b);
if a>b then writeln(b);
if a=b then writeln('=');
if a<b then writeln(a);
end.
{На этом и закончу всем, кто когда либо и чем либо поддерживал данный проект. Думаю, он ещё многим послужит в критический момент. И я говорю не только про "списать домашку". Счастливо оставаться, господин Alviko. Может, ещё увидимся.
Ваш, Глеб 'I3artle' Косырев}