若已知某地区四个各部门的直接消耗系数矩阵 B与总投入X及固定资产折旧D分别为：

                 0       0.15    0.55    0
    B =          0.25    0.05    0.1     0.25     B为4行4列的矩阵
                 0.15    0       0.05    0.35
                 0.1     0.15    0.15    0.1

               360
    X  =       240                                 X为4行1列矩阵
               180
               300

                 5         
     D =        15                                 D为4行1列矩阵
                10
                20


    求出：    各部门新创造价值 Z=( z1  z2  z3  z4)
  各部门最终产品  Y=( y1  y2  y3  y4)
  各部门中间产品 A=(aij)




问题的解决方案：
⑴ 编写输入函数，提供已知数组的数据；
⑵ 编写求A(i,j)=B(i,j)*X(j)的函数；
⑶ 编写函数求sum(A),它表示A矩阵各列的和，要求将结果存入数组A1中;
⑷ 编写计算Z=X–A1-D的函数；
⑸ 编写函数计算A2=sum(A’)。A’代表A矩阵的转置阵，sum(A’)表示计算A’的各列和.
⑹ 编写计算Y1=X-A2的函数;
⑺ 编写函数求 Y=Y1’，Y1’代表Y阵的转置阵。
⑻ 编写输出函数，选择适当的形式数出计算出的各个矩阵。
⑼ 主函数调用上述函数，完成计算任务。