На какой по счету клетке прервется заполнение шахматной доски по алгоритму Сете, если имеется только N зерен?

[m4d1]

Задача 4.
Известна знаменитая легенда об изобретателе шахматной игры.
Царь Шерам, которому была преподнесена в подарок эта игра, захотел наградить изобретателя Сете и разрешил ему выбрать награду самому. «Дай мне, - сказал мудрец, - только несколько пшеничных зерен. Причем ровно столько, сколько поместится на шахматной доске, если ты на первую клетку положишь одно зернышко, то на вторую – два зернышка и так далее: на каждую клетку вдвое больше, чем на предыдущую». Царь был рассержен из-за этой слишком скромной просьбы мудреца. Но как же он был удивлен, когда ему не хватило запасов пшеницы всей Индии, чтобы ее выполнить.
Математики царя Шерама подсчитали, что количество зерен на последней клетке выражается не поддающимся воображению гигантским числом. Зерно занимало бы два амбара длиной от Земли до Солнца.
На какой по счету клетке прервется заполнение шахматной доски по алгоритму Сете, если имеется только N зерен? Составьте программу. (1≤N≤1000000)

[Vanta11a]

Наработки есть или Вы пришли в надежде на халяву?

[m4d1]

Сообщение от Vanta11a

Наработки есть или Вы пришли в надежде на халяву?

в надежде на халяву

[Vanta11a]

Ну хотя бы честно.
Вам нужно что-то в духе

i:=1;
number:=1;
summ:=1;
repeat
summ:=summ+2*i;
i:=2*i;
number:=number+1;
until summ > n;