~n/3 достаточно.
Бросаем первый с этажа номер n/3. Если разбился, то бросаем второй по очереди с 1 этажа, потом со 2, ... до n/3 пока не разобьется. Так найдем этаж.
Если первый шар не разбился. бросаем его с этажа 2n/3. Если тут разбился, то бросаем второй с этажа n/3+1, потом с n/3+2, ... пока не разобьется.
Если 1 шар при падении с 2n/3 не разбился, то бросаем его с 2n/3+1, потом с 2n/3+2, ... пока не разобьется.
126:2=63 ост=0
63:2=31 ост<span>=1 </span>
31:2= 15 ост<span>=1 </span>
15:2=7 ост<span>=1 </span>
7:2=3 ост<span>=1 </span>
3:2=1 ост<span> =1 </span>
1:2=0 ост<span>=1 </span>
126(10)=1111110 (2)
Могу примерный план , может , что то пригодится.
<span>1. Женя купила семь баранок. 2. Собака съела все баранки. 3. Старушка дала Жене цветик-семицветик. 4. Женя загадала желание и оказалась дома. 5. Она оторвала второй лепесток. 6. Вазочка стала целой. 7. Женя пошла во двор. 8. Она загадала желание и очутилась на Северном полюсе. 9. Женя оторвала четвертый лепесток и вернулась во двор. 10. Она загадала, чтобы появилось много игрушек. 11. Куклы, машинки, мячики заполнили все улицы. 12. Женя оторвала шестой лепесток. 13. Игрушки пропали. 14. Женя увидела больного мальчика на скамейке. 15. Женя загадала желание. 16. Мальчик выздоровел.</span>
Program mm;
var a: array [1..10] of real; i: integer; s: real;
begin
for i:=1 to 10 do begin
Writeln("Введите элемент номер ",i); read(a[i]);
end;
for i:=1 to 10 do
if (a[i]>=2) and (a[i]<=5) then s:=s+a[i];
Writeln(s); readln;
end.
Если что, пиши в личку.
1 байт - 8бит
256/8 = 32 Байта