* @copyright 2025 Bartolomé Sintes Marco * @license http://www.gnu.org/licenses/agpl.txt AGPL 3 or later * @version 2025-02-08 * @link https://www.mclibre.org * * This program is free software: you can redistribute it and/or modify * it under the terms of the GNU Affero General Public License as published by * the Free Software Foundation, either version 3 of the License, or * any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU Affero General Public License for more details. * * You should have received a copy of the GNU Affero General Public License * along with this program. If not, see . */ ?> Elimina un animal. Matrices (1). Sin formularios. Ejercicios. PHP. Bartolomé Sintes Marco. www.mclibre.org

Elimina un animal

Actualice la página para mostrar un nuevo grupo de animales.

$numero animales\n"; print "\n"; print "

\n"; foreach ($animales as $animal) { print " &#$animal;\n"; } print "

\n"; print "\n"; // Guardamos el valor del animal a descartar $descarta = $animales[rand(0, $numero - 1)]; // Mostramos el animal a descartar print "

Animal a eliminar

\n"; print "\n"; print "

\n"; print " &#$descarta;\n"; print "

\n"; print "\n"; // Eliminamos el animal de la matriz for ($i = 0; $i < $numero; $i++) { if ($animales[$i] == $descarta) { unset($animales[$i]); } } // Mostramos las imágenes de los animales restantes print "

Quedan " . count($animales) . " animales

\n"; print "\n"; if (count($animales) == 0) { print "

No quedan animales.

\n"; print "\n"; } else { print "

\n"; foreach ($animales as $animal) { print " &#$animal;\n"; } print "

\n"; } ?>