Ну несложно же... пару минут от силы на задачу.
Под алгоритм подходит число R=258, 258 в двоичной системе счисления равно 100000010. Проходим алгоритм с конца, то есть начинаем со второго пункта под пункта б. Проверяем число 10000001|0 единиц 2 значит 2/2, то остаток от деления 0, значит число подходит под этот пункт, идём дальше. 1000000|1 проверяем второй пункт под а. отбрасываем с конца единицу и получаем общее число 1 равное 1, то есть 1 /2 будет иметь остаток 1, значит число подходит и под этот пункт. Оставшиеся число, переводим из двоичной системы счисления в десятичную. 1000000 = 64, а теперь делим число 64 на 4, так как в начале число N *4, а значит чтобы получить N нам нужно разделить 64/4= 16
Ответ:16
1), потому что другие варианты не подходят
Var i,n: integer;
s,t: real;
begin
write('n = '); readln(n);
s:=1; t:=1; i:=1;
repeat
t:=t/i;
s:=s+t;
i:=i+1;
until i>n;
writeln('сумма ряда: ',s:7:5);
<span>end.
</span>