Schnittmenge von 2 Arrays

5 Lösungen

Anfänger - Perl von Gustl - 06.08.2012 um 22:46 Uhr

Schreiben Sie ein Skript, das Sie auffordert 2 Integer-Arrays einzugeben. Aus diesen 2 Arrays soll dann ein drittes Array erzeugt werden, das nur die Elemente enthält, die in beiden Arrays vorkommen. Also die Schnittlänge dieser beiden Arrays.

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 jamosch (170 Punkte) - 24.04.2017 um 09:17 Uhr

Perl-Code

print "Bitte geben Sie das erste Integer-Array ein (Leerzeichen-getrennt):\n";
$integer1 = <STDIN>;
@array1 = split(/ /, $integer1);

print "Bitte geben Sie das zweite Integer-Array ein (Leerzeichen-getrennt):\n";
$integer2 = <STDIN>;
@array2 = split(/ /, $integer2);
@array1 =sort(@array1);
@array2 =sort(@array2);

foreach $zahl(@array1){
	foreach  $compare(@array2){
		if ($zahl == $compare){
		push(@arrayresult, $zahl);	
		}
	}
}

print "Gleiche Zahlen: \n";

foreach (@arrayresult){print "$_\n";}