易语言矩阵乘法实现

ll276783506

功能很简单，实现了两个矩阵相乘的算法，大家有需要的可以看看

  

子程序名	返回值类型	公开	备 注
矩阵乘法	逻辑型
参数名	类 型	参考	可空	数组	备 注
返回矩阵	小数型
第一个矩阵	小数型
第二个矩阵	小数型

变量名	类 型	静态	数组	备 注
i	整数型
j	整数型
k	整数型
第一个矩阵行数	整数型
第一个矩阵列数	整数型
第二个矩阵行数	整数型
第二个矩阵列数	整数型

第一个矩阵行数 ＝ 取数组下标 (第一个矩阵, 1)
第一个矩阵列数 ＝ 取数组下标 (第一个矩阵, 2)
第二个矩阵行数 ＝ 取数组下标 (第二个矩阵, 1)
第二个矩阵列数 ＝ 取数组下标 (第二个矩阵, 2)
如果真 (第一个矩阵列数 ≠ 第二个矩阵行数)  ' 无法相乘
返回 (假)

重定义数组 (返回矩阵, 假, 第一个矩阵行数, 第二个矩阵列数)
计次循环首 (第一个矩阵行数, i)  ' 返回矩阵行数
计次循环首 (第二个矩阵列数, j)  ' 返回矩阵列数
计次循环首 (第一个矩阵列数, k)  ' 次数是第一个矩阵列数或者第二个矩阵行数，因为他们俩是相等的
返回矩阵 [i] [j] ＝ 返回矩阵 [i] [j] ＋ 第一个矩阵 [i] [k] × 第二个矩阵 [k] [j]
计次循环尾 ()
计次循环尾 ()
计次循环尾 ()
返回 (真)

.版本 2<br /> <br /> .子程序 矩阵乘法, 逻辑型, 公开<br /> .参数 返回矩阵, 小数型, 数组<br /> .参数 第一个矩阵, 小数型, 数组<br /> .参数 第二个矩阵, 小数型, 数组<br /> .局部变量 i, 整数型<br /> .局部变量 j, 整数型<br /> .局部变量 k, 整数型<br /> .局部变量 第一个矩阵行数, 整数型<br /> .局部变量 第一个矩阵列数, 整数型<br /> .局部变量 第二个矩阵行数, 整数型<br /> .局部变量 第二个矩阵列数, 整数型<br /> <br /> 第一个矩阵行数 ＝ 取数组下标 (第一个矩阵, 1)<br /> 第一个矩阵列数 ＝ 取数组下标 (第一个矩阵, 2)<br /> 第二个矩阵行数 ＝ 取数组下标 (第二个矩阵, 1)<br /> 第二个矩阵列数 ＝ 取数组下标 (第二个矩阵, 2)<br /> .如果真 (第一个矩阵列数 ≠ 第二个矩阵行数)  ' 无法相乘<br />     返回 (假)<br /> .如果真结束<br /> <br /> 重定义数组 (返回矩阵, 假, 第一个矩阵行数, 第二个矩阵列数)<br /> <br /> .计次循环首 (第一个矩阵行数, i)  ' 返回矩阵行数<br />     .计次循环首 (第二个矩阵列数, j)  ' 返回矩阵列数<br />         .计次循环首 (第一个矩阵列数, k)  ' 次数是第一个矩阵列数或者第二个矩阵行数，因为他们俩是相等的<br />             返回矩阵 <i> [j] ＝ 返回矩阵 <i> [j] ＋ 第一个矩阵 <i> [k] × 第二个矩阵 [k] [j]<br />         .计次循环尾 ()<br />     .计次循环尾 ()<br /> .计次循环尾 ()<br /> 返回 (真)

矩阵乘法.e (3.6 KB, 下载次数: 41)

2020-2-18 04:30 上传

点击文件名下载附件
源码
下载积分: 精币 -2 枚

Mick

有什么用？

吟de一首好湿

矩阵乘法一般不满足交换律。

吟de一首好湿

mikelive1 发表于 2020-2-18 08:09
有什么用？

公司xx统计

快递公司全国物流统计

应用面积挺广的 不是很建议用易语言实现。。。 xx大了吃不消

happyweeks365

看看。。。。。。。。。。。

X.lycs

感谢分享~~

wjswzj0

支持开源~！感谢分享

十一年之那一年

谢谢分享！！！！

mood100

这种一般应用那种场景？

xiaowukeji

这个算法好多啊