VFP程序题目
(1)编一个计算机加密程序,对0-9十个数字进行加密。规则为:0→6,1→8,2→9,3→3,4→1,5→7,6→2,7→5,8→0,9→4。(2)在上题基础上编程对一个...
(1)编一个计算机加密程序,对0-9十个数字进行加密。规则为:0→6,1→8,2→9,3→3,4→1,5→7,6→2,7→5,8→0,9→4。
(2)在上题基础上编程对一个汉字串进行加密,解密
提示(一个汉字可以用ASC函数配合LEFT函数和RIGHT函数分解为两三个数,如"乐"字分解为192,214 展开
(2)在上题基础上编程对一个汉字串进行加密,解密
提示(一个汉字可以用ASC函数配合LEFT函数和RIGHT函数分解为两三个数,如"乐"字分解为192,214 展开
展开全部
刚给你写完一个,你又来一个,道理差不多,你自己修改把
给的分数少,不够费时的,哈哈
编一对电文加密,解密的程序,加密时按下面规律将明文译成密码:
A→Z a→z
B→Y b→y
C→X c→x
即第1个字母变成第26个字母,第i个字母变成第(26-i+1)个字母,非字母字符不变
提问者: 2814456 - 秀才 二级
回答 共 1 条
需要写程序,犯愁,要是没有人回答再说吧.
para zifuold
zifunew=''
for aa=1 to len(zifuold)
zifu =substr(zifuold,aa,1)
zifuasc=asc(zifu)
do case
case zifuasc>=97.and.zifuasc<=122
zifu=chr(219-zifuasc)
case zifuasc>=65.and.zifuasc<=90
zifu=chr(155-zifuasc)
endcase
zifunew=zifunew+zifu
endfor
?zifunew
return zifunew
参考资料:给你写好了,拿走吧,VFP6调试通过,用函数方式调用即可,别说你不会用啊
回答者: hanhezhai - 首席运营官 十二级
给的分数少,不够费时的,哈哈
编一对电文加密,解密的程序,加密时按下面规律将明文译成密码:
A→Z a→z
B→Y b→y
C→X c→x
即第1个字母变成第26个字母,第i个字母变成第(26-i+1)个字母,非字母字符不变
提问者: 2814456 - 秀才 二级
回答 共 1 条
需要写程序,犯愁,要是没有人回答再说吧.
para zifuold
zifunew=''
for aa=1 to len(zifuold)
zifu =substr(zifuold,aa,1)
zifuasc=asc(zifu)
do case
case zifuasc>=97.and.zifuasc<=122
zifu=chr(219-zifuasc)
case zifuasc>=65.and.zifuasc<=90
zifu=chr(155-zifuasc)
endcase
zifunew=zifunew+zifu
endfor
?zifunew
return zifunew
参考资料:给你写好了,拿走吧,VFP6调试通过,用函数方式调用即可,别说你不会用啊
回答者: hanhezhai - 首席运营官 十二级
参考资料: http://zhidao.baidu.com/question/78393782.html
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询