Siemka! niema to nic wspolnego z tworczoscia literacka, ale WŁAŚNIE STWORZYŁEM, prosty programik do obliczania podstawowych wartości dla funkcji kwadratowej
. Wrzucam zeby sie pochwalic
a jednoczesnie moze jakims leniuszkom przyda sie do odrabiania prac domowych z matematyki
poziom gimnazjum/liceum bo studentom chyba nic nie da
. ponizej wklejam kod:
use strict;
#powitanie
print "Witaj, w programie do obliczania delty dla funkcji kwadratowej!\n";
#podaj wybrane zmienne $a, $b, $c. np. $a = "x", gdzie x to wasza wartość.
#potegowanie zapisane jest znakiem x**y, gdzie x to podstawa, a y to wykladnik
#jezeli widzisz znak -- to oznacza on +, jezeli wyjdzie --- to jest to - itd.
#parzysta ilosc - to + nieparzysta to -.
my $x = "x";
my $y = "y";
my $a = "-2";
my $b = "5";
my $c = "2";
my $delta = $b**2 - 4 * $a * $c;
print "-----\n";
print "delta dla funkcji kwadratowej $y = $a * $x**$x + $b$x + $c wynosi:\n";
print "$delta\n";
print "-----\n";
if ($delta < 0) {
print "ta funkcja kwadratowa niema miejsc zerowych!\nbo delta jest mniejsza od 0!\n";
} elsif ($delta == 0) {
print "ta funkcja kwadratowa ma jedno miejsce zerowe!\nponiewaz delta rowna sie 0!\n";
&x0
} else {
print "ta funkcja kwadratowa ma dwa miejsca zerowe!\nponiewaz delta jest wieksza od 0!\n";
&x1x2
}
sub x1x2 {
my $pierdelta = sqrt($delta);
my $x1 = -$b - $pierdelta / 2 * $a;
print "pierwsze miejsce zerowe tej funkcji to: ($x1,0)\n";
my $x2 = -$b + $pierdelta / 2 * $a;
print "drugie miejsce zerowe tej funkcji to: ($x2,0)\n";
print "-----\n";
print "postac iloczynowa tej funkcji to f($x)=$a($x-$x1)($x-$x2)\n";
}
sub x0 {
my $pierdelta = sqrt($delta);
my $x0 = -$b / 2 * $a;
print "to miejsce zerowe to X0:($x0,0)\n";
print "-----\n";
print "postac iloczynowa tej funkcji to f($x)=$a($x-$x0)**2\n";
}
print "-----\n";
my $p = -$b / 2 * $a;
my $q = -$delta / 4 * $a;
print "wierzcholek tej funkcji znajduje sie w punkcie W: ($p,$q)\n";
print "-----\n";
print "!DZIEKUJE ZA WYBRANIE WYLICZACZA FUNKCJI BY MTBS!";zeby odpalic - wszucacie do notatnika i zapisujecie z rozszerzeniem .pl a nastepnie odpalacie w wierszu polecen, sposob uzycia jest zapisany po #
. napisane w perlu.
