Hinweis

[ Zauberspiegel Wissenschaft Ideenfabrik ]

Geschrieben von Gabi am 20. Oktober 2002 18:49:39:

Als Antwort auf: Re: Fran De Aquino - läßt Gewicht verschwinden geschrieben von Gabi am 20. Oktober 2002 17:48:46:

Falls es interessiert, hier der Code (Punkte nach erstem Buchstaben mancher Zeile sind zusätzlich eingefügt, damit der Code hier nicht ausgeführt wird) :

$Nmax=300;

e.cho "Treffpunkte der Reihe 2^N und (phi)^N für jeweils N<300";
e.cho "<.br>im Bereich (0.97 < ((phi)^N3 / 2^N2) < 1.03)<.br>";

f.or($N3=1; $N3<$Nmax; $N3++)
{
$R3=pow(1.618034,$N3);

f.or($N2=1; $N2<$Nmax; $N2++)
{
$R2=pow(2,$N2);
$Rel= $R3/$R2;
$Diff=$N2-$N3; $Quot=$N2/$N3;

i.f (($Rel < 1.03) && ($Rel>0.97))
e.cho "<.br> (1.618034)^N3 / 2^N2 =$Rel (N2=$N2, N3=$N3) (N2-N3=$Diff) (N2/N3=$Quot)";
}
}

MfG
Gabi


Link unten:
Hier wurden Kreuzungspunkte von 2^N mit 3^N , (3/2)^N, (5/2)^N usw. gerechnet:



Antworten:

[ Zauberspiegel Wissenschaft Ideenfabrik ]