Vrijwel alle programmeertalen gebruiken een array structuur om een lijst met gegevens op te slaan . Bijvoorbeeld , " array ( 76 , 3 , 5 ) . " De omgekeerde matrix zou dezelfde gegevens maar achteruit dwz bevatten " new_array ( 5 , 3 , 76 ) . " Perl , een vrij toegankelijke programmeertaal , kunt u een zeer elegante algoritme om een array dat slechts vier regels van de code vereist keren implementeren . Het algoritme maakt gebruik van Perl ingebouwde functies "pop " en " duwen. " Wat je nodig hebt Computer Toon Meer Aanwijzingen De Stappen 1 verkrijgen array data uit het hoofdprogramma . Andere array " new_array " zal omgekeerd data bevatten . Kopen van 2 Verwijder het laatste element van de eerste array met behulp van de functie " pop" . 3 toe dat element als de eerste om de nieuwe array met de functie " shift " 4 Herhaal stap 2 en 3 totdat de eerste rij leeg is ; . alle elementen krijgen overgedragen aan de nieuwe in omgekeerde volgorde . 5 De werkende Perl- programma is hieronder # programma startsmy $ array = [ qw ( 1 2 6 7,4 25 9 12,6 2 6 ) ] ; # Voorbeeld arraymy $ new_array = [ ] ; print " @ $ matrix \\ n " ; reverse_array ( $ array , $ new_array ) ; print" @ $ new_array \\ n " ; # afdrukken van de nieuwe arrayexit ; sub reverse_array { my ( $ array , $ new_array ) = @ _ ; # Stap 1 . Lees initiële arraywhile ( @ $ array ) { my $ invoer = pop ( @ $ array ) ; # Stap 2 . Verwijder het laatste element van de eerste arraypush @ $ new_array , $ binnenkomst; # Stap 3 . Voeg dat element aan de nieuwe array als de eerste } } Het programma uitgang 6 is als volgt 1 2 6 7,4 25 9 12,6 2 6 < --- initiële array6 2 12.6 9 25 7.4 6 2 1 < --- nieuwe arrayThe array wordt teruggedraaid .
|