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

来源:学生作业帮助网 编辑:作业帮 时间:2024/11/03 01:33:40

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

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;