塔兹米喜欢玛茵:32位MD5加密算法的Pascal实现

来源:百度文库 编辑:高校问答 时间:2024/04/19 21:53:47
使用Pascal的一个Function计算MD5加密
方法如下:
(var a,b:string)
b='12'
a=md5(b)
此时a='C20AD4D76FE97759AA27A0C99BFF6710'
格式: function md5(str:string):string(32)
如果是这种格式的再追加30分:
function md5(str:string,len:integer,al:boolean):string(16|32)
len:长度,16或者32
al:大小写,true=大写,反过来也行
请使用标准Turbo Pascal语言进行编程,否则分数打折扣

我有一个半成品,你可以修改修改。

QQ:453628001

a