PUZZLEUP 2015

newkid

solomon_007 发表于 2015-7-30 21:44
马上加薪  多谢!

转了。继续做你的加薪中国梦吧。
谁把附加题做出来再发一个章。

solomon_007

newkid 发表于 2015-7-30 21:40
给你发个章吧，要哪个？

附加题：

SQL> select banner from v$version;

BANNER
-------------------------------------------------------------------------------

Oracle Database 12c Enterprise Edition Release 12.1.0.1.0 - 64bit Production
PL/SQL Release 12.1.0.1.0 - Production
CORE    12.1.0.1.0      Production
TNS for 64-bit Windows: Version 12.1.0.1.0 - Production
NLSRTL Version 12.1.0.1.0 - Production

SQL> with function gcd(m int,n int)
  2  return int
  3  is
  4  begin
  5    if m<n then
  6      return gcd(n,m);
  7    end if;
  8    if n=0 then
  9      return m;
10    end if;
11    return gcd(m-n,n);
12  end;
13  t as (select level n from dual where level>=10 connect by level <100),
14  s as (
15    select a.n + b.n, count(*)*count(*) p, (90*89/2)*(90*89/2) q
16      from t a, t b
17     where a.n < b.n
18     group by  a.n + b.n
19    order by  a.n + b.n),
20  x as (
21    select q ,sum(p) as p
22     from s
23  group by q)
24  select q/gcd(q,p),p/(gcd(q,p))
25   from x
26  /

Q/GCD(Q,P) P/(GCD(Q,P))
---------- ------------
   1069335         7967

SQL>

solomon_007

newkid 发表于 2015-7-30 21:53
转了。继续做你的加薪中国梦吧。
谁把附加题做出来再发一个章。

12C  的， 算不算？

newkid

solomon_007 发表于 2015-7-30 22:33
12C  的， 算不算？

这其实是PL/SQL。你改写成11G递归WITH就算。

udfrog

来个spark的，不知道方便生成列表的语法，坑
val a=sc.parallelize(List(1,2,3,4,5,6,7,8,9,0))
val t=a.map(s=>(1,s))
val t2=t.join(t).filter(s=>s._2._1!=s._2._2)
t2.cache()
val b=t2.map(s=>(1, s._2._1+s._2._2))
val c=b.join(b).filter(s=>s._2._1==s._2._2).count()
val d=t2.count()
t2.unpersist()
println(c+"/"+d*d)

580/8100

solomon_007

SQL>
SQL> with t as (select level n from dual where level>=10 connect by level <100),
  2    s as (
  3      select a.n + b.n, count(*)*count(*) p, (90*89/2)*(90*89/2) q
  4        from t a, t b
  5       where a.n < b.n
  6       group by  a.n + b.n
  7      order by  a.n + b.n),
  8    x as (
  9      select q ,sum(p) as p
10       from s
11    group by q),
12  y(m,n,cnt) as
13     (select q m,p n, 1 cnt from x
14       union all
15      select case when m<n then n else m-n end,case when m<n then m else n end, cnt+1
16        from y
17       where cnt<=200) --这里如果写 n<=0 出现了循环, 所以就猜了个步数作为退出条件.
18  select q/z.m,p/z.m
19     from x,(select m from y where n = 0 and rownum=1) z
20  /
     Q/Z.M      P/Z.M
---------- ----------
   1069335       7967

SQL>

solomon_007

说错了,是 n>=0

newkid

udfrog 发表于 2015-7-31 00:34
来个spark的，不知道方便生成列表的语法，坑
val a=sc.parallelize(List(1,2,3,4,5,6,7,8,9,0))
val t=a. ...

100个的看你怎么写。

newkid

solomon_007 发表于 2015-7-31 00:53
SQL>
SQL> with t as (select level n from dual where level>=10 connect by level

再给你一个章。
你WHERE明明可以写好一点？

WITH t AS (
SELECT LEVEL n FROM DUAL WHERE LEVEL>=10 CONNECT BY LEVEL<=99
)
,s AS (
SELECT t1.n+t2.n s
  FROM t t1,t t2 WHERE t1.n<t2.n
)
,r AS (
  SELECT COUNT(*) m,COUNT(CASE WHEN s1.s=s2.s THEN 1 END) n
  FROM s s1,s s2
)
,t2(m,n) AS (
SELECT m,n FROM r
UNION ALL
SELECT GREATEST(m-n,n),LEAST(m-n,n)
  FROM t2
WHERE m<>n
)
SELECT r.n/t2.m||'/'||r.m/t2.m FROM r,t2 WHERE t2.m=t2.n;

udfrog

newkid 发表于 2015-7-31 01:09
100个的看你怎么写。

估计应该有个指定首位和步长的生成集合的方法，可惜还不知道语法。
不过这表示算法的语法比sql直观多了，挺喜欢的