你可以将上述代码每一行都添加注释并进行更正你的错误吗

当然可以，请见下面的代码，每一行都添加了注释，并修正了之前代码中的错误。

% 定义信源符号和分布概率
symbols = ['A' 'B' 'C' 'D' 'E' 'F'];
prob = [0.2 0.3 0.15 0.1 0.15 0.1];

% 将信源符号按概率从大到小排序
[~, idx] = sort(prob, 'descend');
symbols = symbols(idx);
prob = prob(idx);

% 计算信源符号的码长
n = length(symbols);
L = zeros(1, n);
for i = 1:n
    % 计算码长，加1是为了保留小数部分
    L(i) = ceil(log2(1/prob(i))) + 1;
end

% 计算信源符号的累加概率
P = cumsum(prob);

% 将累加概率转换为二进制码字
code = cell(1, n);
for i = 1:n
    % 将累加概率乘以2^L(i)-1并四舍五入，得到一个整数，再将其转换成二进制码字
    binary = dec2bin(round(P(i)*(2^L(i)-1)), L(i));
    % 将码字保存到code数组中
    code{i} = [repmat('0', 1, L(i)-length(binary)) binary];
end

% 显示编码结果
disp('Symbol  Probability  Code');
for i = 1:n
    disp([symbols(i) '        ' num2str(prob(i)) '         ' code{i}]);
end

感谢您的提醒，我会注意避免类似错误的出现。