Fakultät einer Zahl in pl/sql

Den folgenden pl/sql-Programm einen Fehler generiert, bei der Ausführung auf die Linie der Summe :=temp*Summe; begegnet symbol ; wenn erwartet ( . Erklären Sie bitte, mein Fehler.

declare
  n number;
  temp number;
  sum number := 1;
begin
  n := &n;
  temp := n;
  while temp>0 loop
    sum := temp*sum;
    temp := temp-1;
  end loop;
  dbms_output.put_line('Factorial of '||n||' is '||sum);
end;
/

InformationsquelleAutor rippy | 2014-03-13

Summe ist reserviertes Wort in sql. Ändern Sie die variable Namen, wie

declare
  n number;
  temp number;
  sum_ number := 1;
begin
  n := &n;
  temp := n;
  while temp>0 loop
    sum_ := temp*sum_;
    temp := temp-1;
  end loop;
  dbms_output.put_line('Factorial of '||n||' is '||sum_);
end;
/

Vielen Dank. Ich war mit ihm zu kämpfen, für ziemlich lange.

InformationsquelleAutor hkutluay

5

Vielleicht nicht die Antwort auf deine Frage, aber es gibt keine Notwendigkeit für PL/SQL hier:
```
select round(exp(sum(ln(level))))
from dual
connect by level <= 5;
```
wo die 5 ist Ihre Nummer (5!).

Darüber hinaus, wenn Sie, wie zu bedienen, schneller in PL/SQL verwenden pls_integer statt number.

UPDATE

Also laut Kommentare fühlte ich mich frei, um zu testen:
```
create or replace package test_ is

  function by_query(num number) return number deterministic;

  function by_plsql(num number) return number deterministic;

end test_;

/

create or replace package body test_ is

  function by_query(num number) return number deterministic
    is
      res    number;
  begin
    select round(exp(sum(ln(level))))
    into res
    from dual
    connect by level <= num;

    return res;
  end;

  function by_plsql(num number) return number deterministic
    is
      n number := 0;
  begin
    for i in 1..num loop
      n := n + ln(i);
    end loop;

    return round(exp(n));
  end;

end test_;
```
Es gibt also zwei Funktionen mit unterschiedlichen Inhalten. Test Abfrage:
```
declare
  dummy   number;
begin
  for i in 1..10000 loop
    dummy := test_.by_query(5);
  end loop;
end;
```
0.094 sec.
```
declare
  dummy   number;
begin
  for i in 1..10000 loop
    dummy := test_.by_plsql(5);
  end loop;
end;
```
0.094 sec.

Werden Sie sagen, ich bin cheater und mit deterministic Schlüsselwort, aber hier ist es offensichtlich und notwendig ist, wird durch Logik. Wenn ich es entfernen, den gleichen scripts arbeiten 1.7 sec vs 1.3 Sek., so Verfahren ist nur ein bisschen schneller, es ist auch keine double-Gewinn in der Leistung. Den völlig entgegengesetzten Effekt erhalten Sie, wenn Sie die Funktion in einer Abfrage, so ist es ein fairer Handel.

Vielen Dank für diese nützliche info 🙂
Mit sql zu berechnen, etwas, das sein könnte, berechnet in reinen PL/SQL ist, ich vermute stark, viel weniger effizient. Die rule-of-thumb "nicht verwenden PL/SQL wenn der SQL verwendet werden können" nicht bewerben Sie sich hier.
Ich wäre nicht sicher sind, bitte beweisen Sie Ihre Vermutung und nur nach, dass ich verstehen "-1".
declare n number := 0; begin for i in 1..5 loop n := n + ln(i); end loop; dbms_output.put_line(round(exp(n))); end;
Dies ist eine Schönheit! 🙂

InformationsquelleAutor smnbbrv

declare
    n number;
    i number;
    sum_of_log_10s number;
    exponent number;
    base number;

begin
    n := &n;

    i := 1;
    sum_of_log_10s := 0;

    while i <= n loop
        -- do stuff
        sum_of_log_10s := sum_of_log_10s + log(10,i);
        i := i + 1;
    end loop;

    dbms_output.put_line('sum of logs = '||sum_of_log_10s);

    exponent := floor(sum_of_log_10s);

    base := power(10,sum_of_log_10s - exponent);

    dbms_output.put_line(n||'! = '||base||' x 10^'||exponent);

end;

Einige Erklärungen zusätzlich zu einfach code wird diese Antwort nützlicher für den zukünftigen Leser.

InformationsquelleAutor Bill

Kam ich mit diesem code, ich mag sogar besser als @smnbbrv Antwort. Es ist ein guter Weg, um überprüfen Sie die Geschwindigkeit einer Maschine. Ich habe mit eine variation dieses seit meinen Atari 800

ALTER SESSION FORCE PARALLEL DDL PARALLEL 16; 
ALTER SESSION FORCE PARALLEL DML PARALLEL 16; 
ALTER SESSION FORCE PARALLEL QUERY PARALLEL 16; 

with t as (
    select /*+materialize*/
        rownum i 
    from dual connect by rownum < 100000 -- put number to calculate n! here
)
,t1 as (
    select /*+parallel(t,16)*/ /*+materialize*/
        sum(log(10,i)) logsum
    from t
    )
select 
    trunc(power(10,(mod(logsum,1))),3) ||' x 10^'||trim(to_char(floor(logsum),'999,999,999,999')) factorial
--  logsum
from t1
;

-- gibt 2.824 x 10^456,568

dies ist nicht lesbar. verwenden Sie code-Formatierung, die erklärt wird, indem Sie auf Hilfe klicken. Auch, liefern Kontext für Ihre Antwort, indem Sie erklären, dass Sie erarbeiten auf @smnbbrv Antwort. Ihre Antwort hat nichts mit der Frage zu tun und es ist nicht klar, was Sie wollen "noch besser" als

InformationsquelleAutor Bill

Schreibe einen Kommentar

Du musst angemeldet sein, um einen Kommentar abzugeben.