Enviado em 17/08/2019 - 00:43h
Boa noite,
use warnings;
# Definindo a subrotina
sub fib {
my @list1 = @_;
my $number = $list1[0];
my $val = $list1[1];
if ($number == 0 or $number == 1) {
return $number;
}
my $x =fib($number-1);
my $y =fib($number-2)*$val;
my $z =$x+$y;
return $z; # chamando a recursividade
}
# passando a lista
@Lista = (5, 3);
# Chamando a subrotina com os parametros
print fib(@Lista), "\n";
Criar entrada (menuentry) ISO no Grub
Como gerar qualquer emoji ou símbolo unicode a partir do seu teclado
Instalar o VIM 9.1 no Debian 12
Como saber o range de um IP público?
Muitas dificuldades ao instalar distro Linux em Notebook Sony Vaio PCG-6131L (VPCEA24FM)
Slackpkg+ (Slackpkg Plus) está de volta!
Como dividir duas janelas igualmente e lado-a-lado na sua tela
Será possível instalar Linux Mint LMDE em Sony Vaio? (18)
O livro "Linux - Guia do Administrador do Sistema (Rubem E. Ferre... (1)
Como redefinir o diretório Home? (2)
Posso instalar usar o grub sem ter linux instalado, para iniciar o win... (2)
Ocomon 6.0.1 - Problemas ao editar configurações estendidas (6)