我的目标函数是 d*n*(1-l)*x + s*x

非常抱歉，我之前的回答中的代码存在错误。以下是修正后的代码：

% 目标函数
function obj_value = objective(x, n, d, l, s)
    obj_value = sum(d .* n .* (1 - l) .* x + s .* x); % 目标函数为 d*n*(1-l)*x + s*x 的求和
end

% 约束函数
function [c, ceq] = constraints(x, n, d, l)
    c1 = 0.04 - n; % 不等式约束 0.04 < n(i)
    c2 = n - 0.15; % 不等式约束 n(i) < 0.15
    c3 = 10 - d; % 不等式约束 10 < d(i)
    c4 = d - 100; % 不等式约束 d(i) < 100
    
    % 计算 l(i) 的值
    l1 = 640.944423 * (n(1:27).^3) - 258.570451 * (n(1:27).^2) + 37.969520 * n(1:27) - 1.121484;
    l2 = 552.829149 * (n(28:65).^3) - 225.050537 * (n(28:65).^2) + 33.994698 * n(28:65) - 1.016503;
    l3 = 504.716991 * (n(66:96).^3) - 207.385879 * (n(66:96).^2) + 32.156864 * n(66:96) - 0.973497;
    ceq = [l(1:27) - l1; l(28:65) - l2; l(66:96) - l3]; % 等式约束 l(i) 的对应关系
    
    c = [c1; c2; c3; c4]; % 所有不等式约束
end

% 模拟退火算法
function [best_solution, best_value] = simulated_annealing()
    % 参数设定
    T_init = 100; % 初始温度
    T_min = 1e-3; % 最低温度
    alpha = 0.9; % 温度衰减率
    max_iter = 1000; % 最大迭代次数
    
    % 初始化解
    current_solution = round(rand(1, 96)); % 初始解为随机产生的0-1向量
    
    % 初始化最佳解和最佳值
    best_solution = current_solution;
    best_value = objective(current_solution);
    
    % 迭代优化
    T = T_init;
    iter = 0;
    while T > T_min && iter < max_iter
        % 随机产生新解
        new_solution = current_solution;
        idx = randi(numel(new_solution));
        new_solution(idx) = 1 - new_solution(idx); % 将某一位取反
        
        % 计算目标函数值和约束函数值
        new_value = objective(new_solution, n, d, l, s);
        [c, ceq] = constraints(new_solution, n, d, l);
        
        % 判断是否接受新解
        if isempty(c) && all(ceq == 0) % 新解满足约束条件
            if new_value > best_value % 新解更优
                best_solution = new_solution;
                best_value = new_value;
            else % 根据Metropolis准则以一定概率接受新解
                p_accept = exp((new_value - best_value) / T);
                if rand < p_accept
                    best_solution = new_solution;
                    best_value = new_value;
                end
            end
        end
        
        % 降温
        T = T * alpha;
        
        % 更新当前解
        current_solution = new_solution;
        
        % 更新迭代次数
        iter = iter + 1;
    end
end

% 输入数据
n = zeros(1, 96); % n的初始值全为0
d = zeros(1, 96); % d的初始值全为0
l = zeros(1, 96); % l的初始值全为0
s = zeros(1, 96); % s的初始值全为0

% 调用模拟退火算法求解0-1整数规划问题
[solution, value] = simulated_annealing();
disp('最优解:');
disp(solution);
disp('最优值:');
disp(value);

请注意，这只是一个简单的示例代码，实际问题可能需要根据具体情况进行调整和改进。您需要根据实际情况修改输入数据部分的内容以适应您的问题。