Diskuze: javascript nefunguje cyklus

JavaScript JavaScript javascript nefunguje cyklus

Avatar
Mario Brunmayr:

Ahoj, mám takový menší problém, vygeneroval jsem si javascript kod na výpočet eulerova čísla ale nefunguje mi správně cyklus, kod jsem musel kvůli špatnému generování ručně upravovat a asi tam něco není tak jak má být.

Kod javascript

    var x;
    var v;

    v = 1;
    var i;

    i = 1;
    var q;

    q = i;
    var f;

    f = i;
    var r;

    r = 1;
    var c;
i= prompt("zadej největší exponent pro výpočet Eulerova čísla");

 for (c = 1 ; c <= i ; c += 1) {
        f = q;
        v = 1;
        for (x = 1 ; x <= q ; x += 1) {
            v = v * f;
            f = f - 1;
        }
        q = q - 1;
        r = r + 1 / v;
    }


document.write("<br/> Eulerovo číslo je = "+r+"<br/>");

Nechal jsem si tento kod vygenerovat i v pascalovským jazyce a po zalepení nedostatků při generování mi funguje níže dávám zdroj na pascal app stejného programu,

program MyProgram;
uses Math,Crt, SysUtils;

{ Main }
var
    x : integer;
    v : real;
    i : integer;
    q : integer;
    f : integer;
    r : real;
    c : integer;

begin
    v := 1;
    ReadLn(i);
    q := i;
    f := i;
    r := 1;
    for c := 1 to i do
    begin
        f := q;
        v := 1;
        for x := 1 to q do
        begin
            v := v * f;
            f := f - 1;
        end;
        q := q - 1;
        r := r + 1 / v;
    end;
    WriteLn(r);
   Delay(10000);
end.

Předem děkuji za pomoc

Editováno 17. září 1:29
 
Odpovědět 17. září 1:28
Avatar
Taskkill
Redaktor
Avatar
Odpovídá na Mario Brunmayr
Taskkill:

F12 a console ... Co říká?

 
Nahoru Odpovědět 17. září 1:47
Avatar
Mario Brunmayr:

ten script proběhne ale se špatným výsledkem.

 
Nahoru Odpovědět 17. září 2:58
Avatar
Taskkill
Redaktor
Avatar
Odpovídá na Mario Brunmayr
Taskkill:

Pokud se nepletu, tak se ty dva kody funkcne lisi, prepsal jsem do JSka tu pascalovou verzi a vypadala by takhle: https://jsfiddle.net/…ll/gyfxtj7s/

jo a pozor, vypisuju do console

Editováno 17. září 13:28
Akceptované řešení
+20 Zkušeností
+1 bodů
Řešení problému
 
Nahoru Odpovědět 17. září 13:25
Avatar
Mario Brunmayr:

děkuji funguje :)

 
Nahoru Odpovědět 18. září 11:31
Děláme co je v našich silách, aby byly zdejší diskuze co nejkvalitnější. Proto do nich také mohou přispívat pouze registrovaní členové. Pro zapojení do diskuze se přihlas. Pokud ještě nemáš účet, zaregistruj se, je to zdarma.

Zobrazeno 6 zpráv z 6.