Ивана александровича хлестакова пригласили департаментом. в 1-й день ему прислали 1000 курьеров, а в каждый последующий – в 2 раза больше, чем в предыду¬щий. иван александрович согласился тогда, когда к нему прибыли сразу не менее 30000 курьеров. вывести на экран сообщение о том, на какой день это произошло. определить, не пользуясь умножением и делением: иван александрович с ними не в ладах. (10 ) формат вывода данных: это произошло на …-й день.
begin
k:=1000; n:=1;
while k<30000 do
begin
k:=k+k;
n:=n+1;
end;
writeln('Это произошло на ',n,'-й день');
end.
Результат:
Это произошло на 6-й день