Prácticamente todos los lenguajes de programación utilizan una estructura de matriz para almacenar una lista de datos . Por ejemplo , " matriz ( 76 , 3 , 5 ) . " La matriz inversa contendría los mismos datos, pero hacia atrás , es decir " new_array ( 5 , 3 , 76 ) . " Perl, un lenguaje de programación de libre acceso , le permite implementar un algoritmo muy elegante para invertir una matriz que requiere sólo cuatro líneas del código. El algoritmo utiliza Perl funciones incorporadas " pop" y " empuje ". Cosas que necesitará de computadora
Ver Más instrucciones sobre The Steps
1
obtener datos de la matriz desde el programa principal . Otra matriz " new_array " contendrá los datos invertidos.
2
Eliminar el último elemento de la matriz inicial utilizando la función " pop" .
3
Añada que elemento que el primero en la nueva matriz con la función de "cambio "
4 Repita los pasos 2 y 3 hasta que la matriz inicial se convierte en vacío, . todos los elementos que se transfieren a la nueva en el orden inverso.
5
El programa de trabajo está por debajo de Perl # programa startsmy $ array = [ qw ( 1 2 6 9 7.4 25 12.6 2 6 ) ] ; # Ejemplo arraymy $ new_array = []; print " $ @ array \\ n "; reverse_array ( $ array , $ new_array ) ; print" @ $ new_array \\ n "; # impresión de la nueva arrayexit ;
sub reverse_array {my ( $ array , $ new_array ) = @ _ ; # Paso 1 . Leer arraywhile inicial ( @ $ array ) {my $ entrada = pop ( @ $ array ) ; # Paso 2 . eliminar el último elemento de la arraypush inicial @ $ new_array , $ entrada ; # Paso 3 . Añadir este elemento a la nueva matriz como la primera } }
6
La salida del programa es el siguiente1 2 6 7.4 25 9 12.6 2 6 <--- inicial array6 2 12.6 9 25 7.4 6 2 1 <--- nueva matriz arrayThe se invierte.
