Thread Volumen-Berechnung eines Quaders (7 answers)
Opened by juli at 2011-10-27 14:22

FIFO
 2011-10-27 22:00
#153607 #153607
User since
2005-06-01
469 Artikel
BenutzerIn

user image
2011-10-27T12:22:03 juli
Code: (dl )
1
2
3
4
5
6
7
8
print "Bitte gib die Länge des Quaders an...";
$länge = STDIN
chomp ($länge);

# ...

$ergebnis = $länge*$höhe*$tiefe;
print "Das Volumen des Quaders beträgt $ergebnis.;


Hi, abgesehen von der Umlautfrage :) musst Du:
1. STDIN in <> packen
2. Programmzeilen mit Semikolon beenden
3. strings auch abschließen ("...")
4. DRINGEND use warnings; use strict; verwenden
5. unbedingt Punkt 4. beachten

z.B.:

Code (perl): (dl )
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20

use warnings;
use strict;

# Dieses Script berechnet das Volumen eines Quaders...

$| = 1; # print sofort auf Konsole ausführen

my ($laenge, $hoehe, $tiefe, $ergebnis);

print "Bitte gib die Länge des Quaders an ... ";
chomp($laenge = <STDIN>);

print "Bitte gib die Höhe des Quaders ein ... ";
chomp($hoehe = <STDIN>);

print "Bitte geb die Tiefe des Quaders ein ... ";
chomp($tiefe = <STDIN>);

$ergebnis = $laenge * $hoehe * $tiefe;
print "Das Volumen des Quaders beträgt $ergebnis.\n";


Gruß FIFO
Everyone knows that debugging is twice as hard as writing a program in the first place. So if you're as clever as you can be when you write it, how will you ever debug it? -- Brian Kernighan: "The Elements of Programming Style"

View full thread Volumen-Berechnung eines Quaders