Pascallsches Dreieck in PHP programmiert, kleiner FEHLER

yngvar

Hallo Leute,

vor nen paar Tagenmeinte ich zu meiner Mathelehrerin ich würd noch ein Referat über das pascallsche Dreieck halten, so mit allem möglichem drum und dran, und so, dass die Mitschüler selbst ausprobieren können was für Muster dran kommen usw.. Hat alles funkltioniert, das Dreieck ist dynamisch aufgebaut (mit PHP ohne Db). Ausrechnen tut er mir auch alles bis ins unermessliche, kein Thema, aber sobald ich Durch x Teilbare Zahlen markieren lassen möchte macht er Probleme. Bis in die 30igste Reihe funktioniert alles wunderbar(oder n paar mehr). Anschließend setzen markierte Felder aus. betrachtet man es sich genau entsteht eine Parabel. Die aufm Kopf steht O.o ... Man sieht es aber nur wenn man die Einstellung auf Minimal stellt. Sja am besten mal selbst anschauen: http://pascal.topfkuchration.de . Wisst ihr woran das liegen könnte? Evtl. Serverleistung? Aber ausrechnen tut ers ja, und während es ausgerechnet wird, wird auch überprüft ob Farbig oder nicht ...

Naja, guckt mal falls interessiert.

Mfg, Felix.

Quellcode(Kompletter Inhalt in dieser Datei!):

Code

<?
$tab=$_GET["tab"];// Übergabe der Aktuellen Pascal-Einstellungen
$pascal=$_GET["pascal"];// Übergabe der Aktuellen Seite
$c = $_POST["faktor"];// Übergabe der "Durch x Teilbare Zahl"
//Links (Wird immer ausgegeben)
echo "
<table border=0 width=$table_width><tr><td>
<body bgcolor=black link=#FFFFFF alink=#FFFFFF vlink=#FFFFFF text=#FFFFFF>
[url='?pascal=pascal&tab=$tab>Gewöhnliches'] | <a href=?pascal=faktorium&tab=$tab>Durch x Teilbare Zahlen markieren[/url] | [url='?pascal=fibonatschi&tab=$tab>Fibonatschi</a>']2er Potenz[/url] | <a href=?pascal=einstellungen&tab=$tab>Einstellungen</a>


";
//  !!--!! Links
//Faktorium
if ($pascal == "faktorium")
   {
echo"
<form action='' method='POST'>Durch <input type=text name=faktor size=5> Teilbare Zahlen (Natürliche)
<input type= \"submit\">
</form>
";
   }
//  !!--!! Faktorium
//Einstellungen
if ($pascal=="einstellungen")
   {
echo"
<form action='' method='GET'>Größe:<select name=tab><option value=0>Minimalverbrauch</option><option value=1>Klein</option><option value=2>Normal</option></select>
<input type= \"submit\">
</form>
";
   }
if ($tab=="")
   {
   $a=42;//Tabellenhöhe/breite
   $d=3;//Schriftgröße
   $e=22;//Reihenanzahl
   $b = $a;//Tabellenhöhe/breite
   $table_width = "1180";
   $f = 1;
   }
if ($tab=="0")
   {
   $a=15;//Tabellenhöhe/breite
   $d=1;//Schriftgröße
   $e=60;//Reihenanzahl
   $b = $a;//Tabellenhöhe/breite
   $table_width = "100%";
   $f = 0;
   }
if ($tab=="1")
   {
   $a=42;//Tabellenhöhe/breite
   $d=1;//Schriftgröße
   $e=30;//Reihenanzahl
   $b = $a;//Tabellenhöhe/breite
   $table_width = "1510";
   $f = 1;
   }
if ($tab=="2")
   {
   $a=42;//Tabellenhöhe/breite
   $d=3;//Schriftgröße
   $e=22;//Reihenanzahl
   $b = $a;//Tabellenhöhe/breite
   $table_width = "1180";
   $f = 1;
   }
//  !!--!! Einstellungen
//
//Pascal
//
//Angezeigtes pascallsches Dreieck mit normalen Einstellungen
if($tab == "" OR $tab == "1" OR $tab == "2")
   {
$id = 1;
$wert = 1;
$reihe = 1;
$platz = 1;
$zahl[$reihe][$platz] = $wert;
if($f==0){$wert=0;}
echo "
<div align=center><table border=1><tr width=100%><td width=$a height=$b align=center><font color=white size=$d>".$f*$wert."</td></tr></table>";
while ($platz == $reihe) 
   {
   $id++;
   $reihe++;
   $platz=1;
   $wert=1;
   $zahl[$reihe][$platz] = $wert;
   $zahl[$reihe][0] = 0;
   if($f==0){$wert=0;}
   echo "<table border=1><tr width=100%><td width=$a height=$b align=center><font color=white size=$d>".$wert*$f."</td>";
   while ($platz < $reihe)
      {
      $id++;
      $Nreihe = $reihe;
      $Nreihe--;
      $Aplatz = $platz;
      $platz++;
      $Bplatz = $platz;
      $Azahl = $zahl[$Nreihe][$Aplatz];
      $Bzahl= $zahl[$Nreihe][$Bplatz];
      $wert = $Azahl+$Bzahl;
      if($Aplatz == '0' OR $Bplatz == '0') $wert=1;
      $zahl[$reihe][$platz] = $wert;
      if($f==0){$wert=0;}
      if ($c == "") {$color="white";}else{$x = $zahl[$reihe][$platz] / $c; $y = (int)$x; if($x==$y){$color="red";}else{$color="white";}}
      echo "<td width=$a height=$b align=center><font color=".$color." size=$d> ".$wert*$f." </font></td>";
      }
   echo "</tr></table>";if($reihe > $e) exit;
   }
echo "</td></tr></table>";
   }




//Angezeigtes pascallsches Dreieck bei "Minimal-Einstellungen"
if ($tab == "0")
   {
$id = 1;
$wert = 1;
$reihe = 1;
$platz = 1;
$zahl[$reihe][$platz] = $wert;
if($f==0){$wert=0;}
echo "
<div align=center><font color=white size=$d>".$f*$wert."
";
while ($platz == $reihe) 
   {
   $id++;
   $reihe++;
   $platz=1;
   $wert=1;
   $zahl[$reihe][$platz] = $wert;
   $zahl[$reihe][0] = 0;
   if($f==0){$wert=0;}
   echo "<font color=white size=$d>".$wert*$f."";
   while ($platz < $reihe)
      {
      $id++;
      $Nreihe = $reihe;
      $Nreihe--;
      $Aplatz = $platz;
      $platz++;
      $Bplatz = $platz;
      $Azahl = $zahl[$Nreihe][$Aplatz];
      $Bzahl= $zahl[$Nreihe][$Bplatz];
      $wert = $Azahl+$Bzahl;
      if($Aplatz == '0' OR $Bplatz == '0') $wert=1;
      $zahl[$reihe][$platz] = $wert;
      if($f==0){$wert=0;}
      if ($c == "") {$color="white";}else{$x = $zahl[$reihe][$platz] / $c; $y = (int)$x; if($x==$y){$color="red";}else{$color="white";}}
      echo "<font color=".$color." size=$d> ".$wert*$f." </font>";
      }
   echo "
";if($reihe > $e) exit;
   }
echo "
";
}
//
//  !!--!!  Pascal
//
?>

Alles anzeigen

Boman

Das Problem liegt daran, dass die Zahlen zu groß für php sind. Bereits in der 35. Zeile überschreiten die Werte von "$zahl[$reihe][$platz]" die Zahl 2147483647. Dies ist der größte Integerwert.
Man müsste nur noch herausfinden wie man mit noch größeren Werten rechnen kann.

PS: Als Codeänderung (für meine Verhältnisse eindeutiger zu verstehen) in der 105. und 148. Zeile:

Code

$color = ($c != "" AND $zahl[$reihe][$platz]%$c == 0) ? "red" : "white";

Sollte eigentlich genauso funktionieren (Wenn nicht gar noch besser, weil die Zehlen nicht dividiert werden müssen)(Ist aber trotzdem noch nicht die gesamte Lösung, da bei einigen Zahlen trotzdem noch modulo rumzickt).

PSS: Ich werde mal schauen, ob nicht doch irgendwie größere Zahlen zu verarbeiten gehen.

[EDIT]
Da und da sind jeweils noch ein paar Beiträge, zu einer Ähnlichen Problematik (Modulo lässt sich halt nur auf Integers anwenden und dieser reicht leider nicht aus).

[EDIT]
http://de3.php.net/manual/de/ref.gmp.php Dies ist eine externe LIB, mit der man große Integers berechnen kann. Damit sollte es eigentlich funktionieren. Vielleicht ist bei deinem Hoster ja bereits diese LIB installiert.

Viel Glück, Boman.

yngvar

Code

$color = ($c != "" AND $zahl[$reihe][$platz]%$c == 0) ? "red" : "white";

Die Art kenne ich gar nicht ...

das mit der Library könnte funktionieren, aber leider ist die nicht installiert.. Kann man die installieren lassen/selbst installieren? Bin bei strato.de

Edit: mti den den 2 anderen Links komm ich nich klar, wüsste nicht in welcher art ich das übernehmen könnte..

Boman

Code

$color = ($c != "" AND $zahl[$reihe][$platz]%$c == 0) ? "red" : "white";

Das ist eine Art, um einer Variablen einen Wert in abhängigkeit eines boolean zuweisen zu können.

Code

($boolean) ? $wert_1 : wert_2;

Der Rückgabewert dieser Zeile ist, wenn ($boolean == true) $wert_1 und bei ($boolean == false) $wert_2.
Demzufolge wird bei ($c == "") direkt "white" zurückgegeben, denn dann ergibt der boolean immer false, egal welchen wert der Rest hinter AND auch annehmen würde.
Bei ($c != "") steht es offen, was zurückgegeben wird, es hängt halt von ($zahl[$reihe][$platz]%$c == 0) ab und jenachdem, ob es true oder false ist wird "red" oder auch wieder "white" zurückgegeben.
Das % in $zahl[$reihe][$platz]%$c == 0 ist Modulo, also der Rest, der Ganzzahligen Division der beiden Zahlen. Und wenn der Rest 0 ist, dann ist $c ein Teiler von $zahl[$reihe][$platz].

Wegen der Klasse habe ich auch noch nichts weiteres Herausgefunden. Du kannst ja bei strato ja einmal anfragen ob die Klasse installiert werden kann.

Die beiden anderen Links sind nicht so wichtig.

yngvar

int() funktioniert ja nur bis zu einer speziellen zahl. kann man nicht anhand des restes (%) überprüfen ob die rechnung aufgegangen ist? wir rbauchen ja keine ergebnisse, sondern nur "rot" oder "weiß" als ergebniss. (Frage führt auf ausgängliche Problematik zurück.)

Edit: Das ist durch den von dir geschreibenen Code ja schon geschehen, funktioniert aber leider immer noch nich

yngvar

Jetzt hab ich tatsächlich nur noch diesen einen blöden Fehler drin... echt blöde!!!!!

Boman

Das Problem ist, dass wenn die Zahl größer als der spezielle Wert ist, dann wird sie nicht mehr als Integer gespeichert, sondern als Float.
Das Problem an dem Daten-Typ Float ist, dass er die Zahl nicht genau abspeichert, sondern nur ungefähr: 2357745285661 wird beispielsweise zu 2357745285660. Mit diesen Zahlen lassen sich dann natürlich keine fehlerlosen Modulo-berechnungen durchführen, weil ja die letzte Zahl nicht übereinstimmt.
Eine Möglichkeit, die Zahlen in voller 'Auflösung' zu speichern und auszuwerten wäre der Daten-Typ String. Allerdings fehlt hierzu der benötigte Modulo-Operator, um zwie Zeichenketten zu 'dividieren'. Dies so eine Funktion könnte man aber auch selber schreiben. Ich hab dafür gerade aber keinen Nerv . Vielleicht mag es auch noch andere Lösungsvarianten geben, aber diese sollte funktionieren.

Spontan denk ich mal, dass es mit einer Array-Lösung zu machen wäre, aber das würde den ganzen code nur verkomplizieren.

yngvar

hmh, wie meinen?

Boman

Habe mich jetzt doch mal hin gesetzt, weil ich grad mal Lust hatte. Und folgendes kam dabei raus:

Code

function modulo($string_1,$string_2)
{
  $zahl =$string_2;
  settype($zahl,"integer");
  if(strlen($string_1) < strlen($string_2))
    return $string_1;
  else
  {
    $zusatz = 0;
    for($i=0;$i < strlen($string_1);++$i)
    {
      $zusatz = ($zusatz > 0) ? $zusatz."".substr($string_1,$i,1) : "".substr($string_1,$i,1);
      settype($zusatz,"integer");
      $zusatz = $zusatz%$zahl;
    }
    return $zusatz;
  }
}


function summe($string_1,$string_2)
{
  $laenge = (strlen($string_1) > strlen($string_2)) ? strlen($string_1) : strlen($string_2);
  $zahl = "";
  $tmp = 0;
  for($i=0;$i < $laenge;++$i)
  {
    if($i >= strlen($string_1))
    {
      $tmp_2 = substr($string_2,strlen($string_2)-1-$i,1);
      settype($tmp_2,"integer");
      $zahl_tmp = ($tmp+$tmp_2)."";
      if(strlen($zahl_tmp) > 1)
      {
        $tmp = substr($zahl_tmp,0,1);
        settype($zahl_temp,"integer");
      }
      $zahl = $zahl_tmp.$zahl;
    }
    if($i >= strlen($string_2))
    {
      $tmp_1 = substr($string_1,strlen($string_1)-1-$i,1);
      settype($tmp_1,"integer");
      $zahl_tmp = ($tmp+$tmp_1)."";
      if(strlen($zahl_tmp) > 1)
      {
        $tmp = substr($zahl_tmp,0,1);
        settype($zahl_temp,"integer");
      }
      $zahl = $zahl_tmp.$zahl;
    }
    else
    {
      $tmp_1 = substr($string_1,strlen($string_1)-1-$i,1);
      settype($tmp_1,"integer");
      $tmp_2 = substr($string_2,strlen($string_2)-1-$i,1);
      settype($tmp_2,"integer");
      $zahl_tmp = ($tmp+$tmp_1+$tmp_2)."";
      if(strlen($zahl_tmp) > 1)
      {
        $tmp = substr($zahl_tmp,0,1);
        settype($tmp,"integer");
        $zahl_temp = substr($zahl_tmp,1,1);
      }
      $zahl = $zahl_tmp.$zahl;
    }
  }
  return $zahl;
}

Alles anzeigen

Die Funktion summe bildet die summe von 2 Strings und liefert sie als String zurück.
Die Funktion modulo errechnet den Rest der Division, der Zahl $string_1 durch $string_2. Und sie liefert das Ergebnis ebenfalls als String zurück. Allerdings ist noch ein Problem bei dieser Funktion vorhanden (welches für die Anwendung in deinem Fall nicht stört): Der Wert $string_2 darf nicht höher als 2147483647 sein.

Was du jetzt noch machen musst ist, dass du die Werte der einzelnen Felder immer mit summe() zusammenrechnest und als String abspeicherts und dann per modulo()-Funktion vergleichst.
Falls du die Zahlen, welche ja nun als Daten-Typ String vorliegen, doch noch als double brauchst (was eigentlich Schwachsinn wäre weil dies ungenauer ist) kannst du folgende Zeilen benutzen:

Code

$zahl_als_double = $zahl[$reihe][$platz];
settype($zahl_als_double,"double"); //Jetzt ist $zahl_als_double der Double-Wert von $zahl[$reihe][$platz]

Tags