fork download
  1. 1.upto(Float::INFINITY) do |n| # Брутфосим по количеству кокосов
  2. m = n # Запоминаем число кокосов до начала дележа
  3. next unless 5.times do # Каждый из 5 моряков прячет кокосы
  4. break unless m % 5 == 1 # Если при делении на пять куч остаётся не один кокос, отбрасываем этот вариант
  5. m = (m / 5) * 4 # Новая куча
  6. end
  7. next unless m % 5 == 0 # В конце число кокосов должно делиться на 5
  8. puts n
  9. break
  10. end
Success #stdin #stdout 0.02s 7452KB
stdin
Standard input is empty
stdout
3121