Calcolare la media scolastica :D

[The Massakretor]

#!/usr/bin/perl

print "Eccoci nel mio primo programma, che non fa altro che calcolarti la media scolastica :D\n";
print "Inserisci il tuo voto di Matematica: ";
$mat = <STDIN>;
print "Italiano: ";
$ita = <STDIN>;
print "Inglese: ";
$ing = <STDIN>;
print "Educazione Fisica: ";
$edf = <STDIN>;
print "Storia: ";
$sto = <STDIN>;
print "Geografia: ";
$geo = <STDIN>;
print "Fisica: ";
$fis = <STDIN>;
print "Disegno: ";
$dis = <STDIN>;
print "Religione: ";
$rel = <STDIN>;
 
$ris = $mat + $ita + $ing + $edf + $sto + $geo + $fis + $dis + $rel ;
$med = $ris / 9 ;

print "La tua media e' $med, bravo :D\n";

sleep 10;

Il Mio Primo Programma in perl, siate magnanimi XD consigli su come lasciare un solo numero dopo al virgola? ( tipo 6,4444 a 6,4 )

Grazie Mille

 

[Dark Flash]

no a me piace di più con più numeri (non troppi però eh!) dopo la virgola.
carino come programma! non mi era mai venuto in mente!

 

[imported_opocaj]

BRAVO, ecco un nuovo programmatore in Perl. Ti darei +1 solo per questo xD

 

[The Massakretor]

ei non esageriamo XD

comunque dark flash era anche 6,25 dato che 6,4444444444444444 non è molto bello a vedersi