Re: Just for fun
- From: Anthony Wilson <amwilson@xxxxxxxxxxxx>
- To: oracle-l@xxxxxxxxxxxxx
- Date: Sun, 6 Nov 2005 21:30:13 +0800
On Sat, Nov 05, 2005 at 04:51:26PM, t_adolph@xxxxxxxxxxx wrote:
> Hi all,
>
> Its Saturday afternoon, its raining and the rugby doesn't start for a while,
> so....
>
> create or replace procedure circle is
> pi constant number(5,3) := 3.142;
I believe it's because you are using a constant for pi. Maybe this
code will help:
select n terms
, sqrt(6*(
sum (1 / power(n, 2)) over (
order by n
rows between unbounded preceding and current row
)
)
) approx1
, 4 * (
sum(decode(mod(n, 4), 1, (1/(2*n-1)), 2, (1/(2*n-1)), (-1/(2*n-1)))) over (
order by n
rows between unbounded preceding and current row
)
) / sqrt(2) approx2
, 2*exp(sum(ln(power(2*n, 2) / ((2*n-1)*(2*n+1)))) over (
order by n
rows between unbounded preceding and current row
)) approx3
from (
select level n
from dual
connect by level <= &terms
)
/
Yep, I had a rainy weekend too... :-)
cheers,
Anthony
--
Anthony Wilson
Other related posts:
