Funktion

[Magnia]

Hallo
Ich habe ein kleines Programm geschrieben um Funktionswerte zu berechnen möchte aber gerne ein paar "Modifikationen" vornehmen!

#! /usr/bin/perl


print "Geben Sie den Streckungs/Stauchungsfaktor für die Quadratische Funktion x² ein\n";
$a = <STDIN>;


print "x | $a*x²\n---------------\n";
$x = -10;


while ($x <= 10) {
$y = $a * $x**2;
print "$x | $y\n";
$x += 1;
}

Ich möchte nun aber das er die Wertetabelle von +10 bis -10 ausgibt und nicht wie jetzt andersrum und die x Werte in einer Reihe und die passenden y Werte dadrunter.
also so
x1 x2 x3 x4 x5
y1 y2 y3 y4 y5

Und leider brint er bei der zeile

print "x | $a*x²\n---------------\n";

immer das *x² in die nächste Zeile ich möchte aber das das in einer Zeile steht

Wäre schön wenn mir jemand auf die Sprünge helfen könnte ?

 

[Magnia]

#! /usr/bin/perl

print  "Geben Sie a für die Funktion f(x)=ax^n+bx+c ein\n";
$a = <STDIN>;
chomp ($a);

print "Gebene Sie n für die Funktion f(x)=ax^n+bx+b ein\n";
$n = <STDIN>;
chomp ($n);

print "Geben Sie b für die Funktion f(x)=ax^n+bx+c ein\n";
$b = <STDIN>;
chomp ($b);

print "Geben Sie c für die Fuktion f(x)=ax^n+bx+c ein\n";
$c = <STDIN>;
chomp ($c);

print "x | $a*x^$n+$b*x+$c\n---------------\n";

$x = 10;

while ($x >= -10) {
        $y =  ($a * $x**$n) + ($b * $x) + $c;
        print "$x | $y\n";
        $x -= 1;
}

Jetzt fehlt nur noch die Wiedergabe in einer Reihe den Rest hab ich nun rausbekommen