2011复活节就要到了，来个最短源代码比赛吧！[22日23点59分及之前提交代码都行！]

〇〇

原帖由 nyfor 于 2011-4-22 13:27 发表
发现一个地方重复, 代码缩减到 1245

去掉注释，用196楼工具测一下，是否+36

nyfor

原帖由 〇〇 于 2011-4-22 13:43 发表

去掉注释，用196楼工具测一下，是否+36

用你的工具测了下 1278 - 1245 = +33 不是 +36呢.

nyfor

重发代码, 1245 bytes

cow977

原帖由 nyfor 于 2011-4-22 13:27 发表
发现一个地方重复, 代码缩减到 1245

是to_char(3.31,'mm.dd')吧.

还有, t char(1) := ' '好象也是多余的.

nyfor

原帖由 cow977 于 2011-4-22 14:22 发表


是to_char(3.31,'mm.dd')吧.

还有, t char(1) := ' '好象也是多余的.

原来不多余,后来的修改使得他多余了. 哈哈. 你看过我代码了?

nyfor

经过 cow977 的提示,再次修改, 使得代码又缩减了. 长度为: 1236 byte.

cow977

一是充分利用了类型的隐式转换：
v date := to_date(3.31, 'mm.dd');
if substr(c(y), -2) = 1 then
二是采用了负计数，改greatest为least来比较两个数的大小；
三是用减0.5后的四舍五入代替floor函数。

给你总结了三条.哈哈.

〇〇

ft,1245是没有加密的

〇〇

C:\downloads>d:cc nyfor_1245fix.sql
1235bytes

〇〇

C:\downloads>d:cc nyfor_1245fix2.sql
***bytes

[ 本帖最后由 〇〇 于 2011-4-22 15:40 编辑 ]