Výpočet kvadratické rovnice v PHP
V dnešním článku bych ukázal, jak jsem udělal script na výpočet kvadratické rovnice v PHP. Ukázku si můžete
prohlédnout zde.
Pokud nevíte, co je to diskriminant, tak rovnou skončete se čtením, protože to pro vás bude španělská vesnice
A ještě na úvod by se slušelo říct, že tento příklad jsme ve škole dělali v
Pascalu
Tak a teď se můžeme vrhnout do samotného scriptu ;) Nebudu zde popisovat, jak se dělá HTML dokument a podobý věcičky a rovnou skočím na samotné tělo stránky. Jako vstupní brána do scriptu nám samozřejmě poslouží formulář:
<form action="adresa" method="get">
<input type="text" name="a">Proměnná A
//Stejně tak napíšeme i proměnnou B a C
<input type="hidden" name="akce" value="vypocitat">
<input type="submit" value="Vypočítat">
</form>
Rejpalové mi odpustí, že je to napsané v dost jednoduchém HTML a můžeme jít dál :))
<?
if ($_GET["akce"] == "vypocitat"):
$a = $_GET["a"];
$b = $_GET["b"];
$c = $_GET["c"];
if ($a=="" or $b=="" or $c==""):
echo "Nebyly zadány všechny proměnné!";
else:
Myslím, že toto je jasné. Pokud je potvrzen formulář, splní se první podmínka a může se dál pokračovat ve scriptu. Další podmínka ověřuje, zda-li byly zadány všechny údaje. K tomu se použil operátor OR
A nyní si musíme rozmyslet samotný výpočet kvadratické rovnice. Nejdříve musíme ošetřit to, aby z rovnice nevznikla lineární rovnice. A pokud vznikne, vypočítá se kořen rovnice:
if ($a == 0):
if ($b == 0):
echo "B se nesní rovnat nule!";
else:
echo -$c/$b;
endif;
else:
Nevíte, kde se vzala podmínka, že se B nesmí rovnat nule? Fakt nevíte? ;) Dělit nulou přeci nejde 
A nyní potřebujeme vypočítat diskriminant - pokud bude záporný, rovnice
nemá řešení, pokud bude nula, výsledek je jen jeden a pokud je kladný, výsledky budou dva:
//výpočet diskriminantu:
$d = $b * $b - (4 * $a * $c);
if ($d < 0):
echo "Rovnice nemá řešení";
else:
if ($d == 0):
echo -$b/(2 * $a);
else:
echo (-$b + sqrt($d))/(2 * $a);
echo (-$b - sqrt($d))/(2 * $a);
endif;
endif;
endif;
endif;
endif;
?>
Samozřejmě že by bylo dobré výstup zformátovat a přidat CSS, aby to bylo trošku k světu
Kategorie: Web a vše kolem něj ≈ 24. 11. 2005 ≈ Počet zobrazení: 12092x
Komentáře
Podle učebnice jsem si zjistil, co to přibližně je, ale zatím to moc dobře nechápu
#!/usr/bin/perl
# Program pro vypocet Kvadratickych rovnic
# Napsal : Martin Vesely alias Pckeeper
# mail: pckeeper@seznam.cz
print "Hodnota a";
$a=<STDIN>;
print "Hodnota b";
$b=<STDIN>;
print "Hodnota c";
$c=<STDIN>;
$abc=$b*$b-4*($a*$c);
print "D = $abc\n";
if ($abc>=0) {
$x0=(-$b+sqrt($abc));
$x1=$x0/(2*$a);
$x2=(-$b-sqrt($abc));
$x3=$x2/(2*$a);
print "Kvadraticka rovnice ma reseni a koreny jsou X1=$x1 a X2=$x3 :)\n";
}
else {
print "Kvadraticka rovnice nema reseni :(";
}
![:]](smiles/2.gif)
)
pckeeper: hmm, vypadá to hezky
k těm komplexním číslům:
d:=-d;
y1:=(-+sqrt(d))/(2*a);
y2:=(-b-qrt(d))/(2*a); write ln('Koren x1 se rovna hodnote ',y1:3:3,' i');
writeln('Koren x2 se rovna hodnote ',y2:3:3,' i');
prostě tak nějak :)
Hezký
Ale teď si mi připoměl jednu děsně hnusnou věc
Za 3 týdny píšeme kompozici z komplexních čísel To co jsem napsal bylo v perlu nikoliv v php :)
. Při prezentaci tak snadného prográmku je třeba, aby byl více než dokonalý 
