Praktiskt taget alla programmeringsspråk använder en matris struktur för att lagra en lista med uppgifter . Till exempel, " array ( 76 , 3 , 5 ) . " Den omvända array skulle innehålla samma uppgifter men baklänges , dvs " new_array ( 5 , 3 , 76 ) . " Perl , ett fritt tillgängligt programmeringsspråk , kan du genomföra en mycket elegant algoritm för att vända en matris som kräver endast fyra rader i koden . Algoritmen använder Perl inbyggda funktioner " pop " och "push ". Saker du behöver
Computer
Visa fler instruktioner
Steps
1
Skaffa array data från huvudprogrammet . En annan array " new_array " kommer att innehålla omvända data.
2
Ta bort det sista elementet från den ursprungliga arrayen med " pop " -funktion .
3
Lägg till att inslag som den första till den nya arrayen med " shift " funktionen
4
Upprepa steg 2 och 3 tills den första arrayen blir tom , . alla dess beståndsdelar får överföras till den nya i omvänd ordning .
5
arbetar Perl -programmet är under # program startsmy $ array = [ QW ( 1 2 6 7,4 25 9 12,6 2 6 ) ] ; # Exempel arraymy $ new_array = [ ] ; print " @ $ array \\ n "; reverse_array ( $ array , $ new_array ) , print " @ $ new_array \\ n "; # Skriva ut nya arrayexit ,
sub reverse_array { my ( $ array , $ new_array ) = @ _ ; # Steg 1 . Läs initial arraywhile ( @ $ array ) { my $ inträde = pop ( @ $ array ) , # Steg 2 . ta bort det sista elementet i den ursprungliga arraypush @ $ new_array , $ post ; # Steg 3 . Lägg det elementet till den nya arrayen som den första } }
6
programutbud är följande1 2 6 7,4 25 9 12,6 2 6 < --- initial array6 2 12,6 9 25 7,4 6 2 1 < --- ny arrayThe array reverseras .
