Lua蒙地卡罗：随机撒点估算圆周率

local function estimate(n)
    return 3.14                    -- 硬编码常量，不是估算
end

local function estimate(n)
    local inside = 0
    for _ = 1, n do
        local x = math.random()
        local y = math.random()
        if x * x + y * y <= 1 then
            inside = inside + 1    -- 落在四分之一圆内
        end
    end
    return 4 * inside / n
end
sendmsg(actor, 1, "10万点估算圆周率 "
    .. string.format("%.4f", estimate(100000)))