| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 2194 人关注过本帖
标题:再来一个生肖反向运算
只看楼主 加入收藏
qingfameng
Rank: 12Rank: 12Rank: 12
等 级:贵宾
威 望:35
帖 子:964
专家分:3019
注 册:2010-2-6
收藏
得分:0 
来个数字式的。
nyea=大于零的年份数字 比如: 2009 等
cm=''
csz="478554829447543550215195550595480345267549658516794990153746"
csz=csz+csz
csz=subs(csz,((nyea%12-1)*5+1),70)
for i=1 to 12
  cm=cm+chr(val(substr(csz,i*5+1,5)))
endf
?cm

2010-07-11 01:07
中国龙王
Rank: 5Rank: 5
等 级:贵宾
威 望:16
帖 子:484
专家分:283
注 册:2006-5-17
收藏
得分:0 
呵呵,真痛快。还是用substr()函数来得爽,谢谢大家了

不要为了打发无聊而做无聊的事!不要在虚幻的世界里做虚幻的事!
2010-07-11 12:09
y_zy
Rank: 1
等 级:新手上路
帖 子:6
专家分:0
注 册:2010-7-7
收藏
得分:0 
生肖 = Substr('鼠牛虎兔龙蛇马羊猴鸡狗猪',(Mod((年号)-4,12)+1)*2-1,2)
1900是鼠年
mod(1900,12)≡ mod(1896,12)+mod(4,12)≡ 0+mod(4,12)≡ mod(4,12)
Mod((年号)-1900,12)≡ Mod((年号)-1896-4,12)≡Mod((年号)-4,12)
2010-07-14 22:31
快速回复:再来一个生肖反向运算
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.022233 second(s), 7 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved