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

nyfor

是否允许使用Oracle系統定义且Public可以访问的Type ?

regonly1

我的测试脚本：
declare
    len pls_integer := 0;
begin
    execute immediate 'alter session set nls_date_format = ''yyyy-mm-dd''';
    easter.showalleasterday;
    dbms_output.put_line('-------------------------------------');
    easter.showMaxOccurenceEasterDay;
    dbms_output.put_line('-------------------------------------');
    easter.showLeapEasterDay;
    dbms_output.put_line('-------------------------------------');
    easter.showFoolEasterDay;
   
    dbms_output.put_line('-------------------------------------');
    select sum(length(replace(replace(text,' '),chr(9))))
      into len
      from user_source
     where name='EASTER';   
    dbms_output.put_line('script bytes: ' || len);
end;
/

regonly1

这个我也问过了，不可以。

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

rollingpig

CHR(10)也要replace掉，不然多不少呢
SELECT SUM(LENGTH(REPLACE(REPLACE(REPLACE(TEXT,' '),CHR(10)),CHR(9)))) BYTES FROM USER_SOURCE WHERE NAME='EASTER'

lastwinner

原帖由 rollingpig 于 11-4-20 13:13 发表


Total 是Total 愚蛋节数

比如说，Total 3个愚蛋节数，分别出现在2018,2029,2040,那么输出就应该是

YEAR        TOTAL
2018         3
2029         3
2040         3

滚珠说的正确

原帖由 hudingchen 于 11-4-20 13:20 发表


一年只有一个复活节,只有一个愚人节,也就是说一年中最多只有一个愚蛋节,结果应该是下面的吧
YEAR        TOTAL
2018         1
2029         1
2040         1

这个不对，请参考滚珠说的

lastwinner

原帖由 〇〇 于 11-4-20 13:27 发表
q4的第2列全是1？

不是，是总的愚蛋节的数目

原帖由 regonly1 于 11-4-20 13:56 发表
这样的输出是没问题，但是这样合理吗？

合理的我本意也是如此

cow977

那又要多不少Byte了.

lastwinner

原帖由 regonly1 于 11-4-20 13:13 发表
另外一个疑问，有要求每个过程能在独立的session实现么？

这个我没太明白，我本意是开发一个package，然后调用各个过程就可以出结果了

lastwinner

原帖由 cow977 于 11-4-20 16:30 发表
Q：人肉怎么定？
A：一切都需要计算得出，不能通过推理得出哪怕是中间结果。例如2099-1900=199，这个199需要用减法算式得出，而不能直接写199.



这要求有点过吧，个人觉得算法上的一些处理还是应该允许的，也体现一些解题技巧。

其实要求比最初想法已经降低很多了，要不就得传参数了

nyfor

如果是固定年份范围，那么输出是固定的，这样是否可以使用包的初始化代码，把四个过程公用的在初始化的时候做，这样可以省不少字节呢

还有输出中，要包含那个标题头的行吗？如果包含各列的内容是否需要对齐？

[ 本帖最后由 nyfor 于 2011-4-20 19:27 编辑 ]