Help for this page

Select Code to Download

Select or download this

$r = 1.3;
print $r,"\n";
$rounded=sprintf ("%.1f",$r+.05); 
print $rounded,"\n";

Select or download this
```
 
perl -w round.pl 
1.3
1.4
```