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

xqmei

so far:
SQL> SELECT SUM(length(REPLACE(REPLACE(REPLACE(text, ' '), chr(9)), chr(10)))) bytes  FROM user_source WHERE NAME = 'EASTER';

     BYTES
----------
      1587

regonly1

第二次跑的时候，上次共享的结果集会延续到这次，如果不在运行之前清空，就会越来越多。可能你本身就已经清空了，所以没问题吧。

原帖由 newkid 于 2011-4-20 23:11 发表

我也用共享结果集，没你说的问题啊？

〇〇

完成了q1 3 4
SQL> SELECT SUM(LENGTH(REPLACE(REPLACE(TEXT,' '),CHR(10)))) bytes FROM USER_SOURCE WHERE NAME='EASTER';

     BYTES
----------
      1486

regonly1

呃，我还在1645

cszxheap

原帖由 nyfor 于 2011-4-20 16:55 发表
是否允许使用Oracle系統定义且Public可以访问的Type ?

个人认为这个没有问题，我是用了。

nyfor

我觉得题目的输出应该是严格的输出. 对齐也不应该是大致对齐.
这样每一个人的输出都是完全一样的, 结果的正确性也容易验证.

rollingpig

严格输出太难了，比如说maxocurrence, 你不知道它会有多长，说不定超过一行

lastwinner

原帖由 newkid 于 11-4-21 02:36 发表
回车去掉的话：

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

    BYTES
---------
     1391

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

rollingpig

郁闷
1392

原帖由 newkid 于 2011-4-21 02:36 发表
回车去掉的话：

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

    BYTES
---------
     1391

lastwinner

原帖由 cszxheap 于 11-4-21 09:17 发表



个人认为这个没有问题，我是用了。

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