Array von Zahlen in die nächstgelegene durch 5 teilbare Zahl umwandeln

1 Lösung

#235

Array von Zahlen in die nächstgelegene durch 5 teilbare Zahl umwandeln

Anfänger - Perl von Gustl - 08.05.2019 um 20:08 Uhr

Schreibe ein Programm welches aus einem Array von Dezimalzahlen diese Zahlen in die nächstgelegene durch 5 teilbare Zahl umwandeln.

Etwa so:

Konsolenausgabe:

 7.1 => 5
 8.4 => 10
-2.4 => 0
-2.6 => -5
-8.3 => -10

Bitte melden Sie sich an um zur Aufgabenbeschreibung eine Frage zu stellen.

Frage stellen

Bitte melden Sie sich an um eine Lösung einzureichen.

Lösung einreichen

von Gustl (6560 Punkte) - 08.05.2019 um 20:16 Uhr

Perl-Code

#!/usr/bin/perl

use strict;
use warnings;
use Math::Round;

my @array = (7.1, 8.4, -2.4, -2.6, -8.3, 16.7, -34.8, -12.9, 456.2);
foreach( @array ){
   print $_." => ";
   my $new = nearest(5, $_);
   print $new."\n";
   $_ = $new;
}