Предположим, что 100 человек, стоящих по кругу в порядке от 1 до 100. № 1 имеет меч. Он убивает следующего человека (т.е. № 2) и дает меч следующему (т.е. № 3). Все люди делают то же самое, пока не выживет только 1 человек. Какое число сохранилось в последний раз?
Есть 100 человек, начиная от 1 до 100 человек.
Я попытался с
persons <- c(1:100)
for (i in 1:100) {
qu <- persons[seq_along(persons) %% 2 > 0]
if (q2 == 2) {
print(q2[2])
}
}
а также с этим
q=0
while(q==0){ persons=persons[seq_along(persons) %% 2 > 0]
if(length(persons)==2){ print(persons[2])
q=1}}
Но это дает ответ, который неверен и не решает цель.
Любое решение, как это можно сделать?