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

lastwinner

原帖由 nyfor 于 11-4-21 09:24 发表
我觉得题目的输出应该是严格的输出. 对齐也不应该是大致对齐.
这样每一个人的输出都是完全一样的, 结果的正确性也容易验证.

结果正确性大家可以讨论的，这个可以提前核对，因为目标是代码最短，但是不能讨论算法的具体实现
严格输出的确不好弄，差不多就行了

regonly1

那就是只能是内置类型，不能是用户下新建对象。

原帖由 lastwinner 于 2011-4-21 10:13 发表


同意，可以使用内置对象，但不允许新建对象
隐含意义就是该package在任何schema下都能独立运行

jiqing1004

Q2 有点麻烦啊 ，还需进一步精简

script bytes: 1431

nyfor

原帖由 lastwinner 于 2011-4-21 10:16 发表


结果正确性大家可以讨论的，这个可以提前核对，因为目标是代码最短，但是不能讨论算法的具体实现
严格输出的确不好弄，差不多就行了

大致差不多的意思是, 我可以在输出标题的时候使用人肉的空格, 而这个空格且不会计算到最终的源码长度中? 这可以吗?

nyfor

还有日期和字符串之间的转换, 格式串不可以依赖于session设定哦.

〇〇

SQL> SELECT SUM(LENGTH(REPLACE(REPLACE(REPLACE(REPLACE(TEXT,' '),CHR(9)),CHR(10)),CHR(13)))) bytes FROM USER_SOURCE WHERE NAME='EASTER';

     BYTES
----------
      1496

已用时间:  00: 00: 00.01
SQL> exec easter.showMaxOccurenceEasterday
MAXOCC MO_CNT MAXOCC_3 MO3_CNT MAXOCC_4 MO4_CNT
*
PL/SQL 过程已成功完成。

已用时间:  00: 00: 00.01
SQL> exec easter.showFoolEasterday
YEAR TOTAL
*
PL/SQL 过程已成功完成。

已用时间:  00: 00: 00.01
SQL> exec easter.showLeapEasterday
ABSENT_START ABSENT_END
**
PL/SQL 过程已成功完成。

已用时间:  00: 00: 00.04

〇〇

set lines 1000
set severout on size 10000
oracle 10g这没有问题吧

〇〇

SQL> SELECT SUM(LENGTH(REPLACE(REPLACE(REPLACE(REPLACE(TEXT,' '),CHR(9)),CHR(10)),CHR(13)))) bytes FROM USER_SOURCE WHERE NAME='EASTER';

     BYTES
----------
      1456

已用时间:  00: 00: 00.01
SQL> exec easter.showLeapEasterday
ABSENT_START ABSENT_END

rollingpig

这样吧，用translate, 该去哪个去哪个，比replace好用

    select sum(length(translate(text,'A'||chr(32)||chr(10)||chr(9)||chr(13),'A')))
      from user_source
     where name='EASTER' and trim(text) not like '--%';


目前，放弃对齐，或者说hard code对齐(只对齐 2011-2099) : 1384
勉强对齐，或者说以空格分隔各列，包括列头，1387

MAXOCC                                MO_CNT MAXOCC_3   MO3_CN       MAXOCC_4                    MO4_CNT
03-30/03-31/04-05/04-10/04-15/04-20/04-21 4  03-30/03-31 4          04-05/04-10/04-15/04-20/04-21 4                                                   

原帖由 lastwinner 于 2011-4-21 10:11 发表



哥，13才是回车，10是换行，9是TAB，32是空格，按常理这几个都要去掉的

〇〇

BYTES
----------
      1429