結果
| 問題 | 
                            No.66 輝け☆全国たこやき杯
                             | 
                    
| コンテスト | |
| ユーザー | 
                            👑  | 
                    
| 提出日時 | 2022-01-10 11:52:09 | 
| 言語 | Lua  (LuaJit 2.1.1734355927)  | 
                    
| 結果 | 
                             
                                AC
                                 
                             
                            
                         | 
                    
| 実行時間 | 6 ms / 5,000 ms | 
| コード長 | 910 bytes | 
| コンパイル時間 | 91 ms | 
| コンパイル使用メモリ | 6,816 KB | 
| 実行使用メモリ | 6,824 KB | 
| 最終ジャッジ日時 | 2024-11-14 10:45:56 | 
| 合計ジャッジ時間 | 659 ms | 
| 
                            ジャッジサーバーID (参考情報)  | 
                        judge5 / judge2 | 
(要ログイン)
| ファイルパターン | 結果 | 
|---|---|
| other | AC * 10 | 
ソースコード
local mfl, mce = math.floor, math.ceil
local bls, brs = bit.lshift, bit.rshift
local m = io.read("*n")
local n = bls(1, m)
local a = {}
for i = 1, n do
  a[i] = io.read("*n")
end
local sz = 1
local dp1, dp2 = {}, {}
for i = 1, n do
  dp1[i] = 1
end
local f = true
local function getrate(x, y) return a[x] * a[x] / (a[x] * a[x] + a[y] * a[y]) end
while sz < n do
  local blocks = mfl(n / (sz * 2))
  local src = f and dp1 or dp2
  local dst = f and dp2 or dp1
  f = not f
  for i = 1, n do
    dst[i] = 0
  end
  for ib = 1, blocks do
    local offset = (ib - 1) * sz * 2
    for left = offset + 1, offset + sz do
      for right = offset + sz + 1, offset + sz * 2 do
        dst[left] = dst[left] + getrate(left, right) * src[left] * src[right]
        dst[right] = dst[right] + getrate(right, left) * src[left] * src[right]
      end
    end
  end
  sz = sz * 2
end
local tbl = f and dp1 or dp2
print(tbl[1])