pascal的快速幂的矩阵乘法,求详解和具体实现.

来源:学生作业学帮网 编辑:学帮网 时间:2024/05/16 06:13:47

pascal的快速幂的矩阵乘法,求详解和具体实现.

给你写个框架吧,快速幂就是二分递归
function quick(var x:array[1..2,1..2] of integer); 根据你自己的矩阵大小改变
var y:array[1..2,1..2]of integer;
begin
if n=1 then exit(a); a为原基础矩阵.
y:=quick(n div 2);
if n mod 2=0 then exit(jucheng(y,y)) jucheng就是矩乘的函数
else exit(jucheng(jucheng(y,y),a));
end;