Skip to main content

Quick actions

cmd+k|ctrl+k

Search actions and languages

Navigation

Languages

Fibonacci

Snippet info

Language

Perl

Visibility

public

Author

gael-m

Created

2021-12-07T13:12:37.505585Z

Updated

2021-12-07T13:12:37.505585Z

123456789

my ($uno,$dos) = ("0","1");

my $cantidad = "10";

for my $num(0..$cantidad) {

print $uno."\n";

my $final = $uno + $dos;

$uno = $dos;

$dos = $final;

}

my ($uno,$dos) = ("0","1");
my $cantidad = "10";
 
for my $num(0..$cantidad) {
print $uno."\n";
my $final = $uno + $dos;
$uno = $dos;
$dos = $final;
}

Perl

INFO

Home Public snippets Account Contact Privacy