Skip to main content

Quick actions

cmd+k|ctrl+k

Search actions and languages

Navigation

Languages

Fibonacci_Perl

Snippet info

Language

Perl

Visibility

public

Author

fragosomadera99

Created

2021-11-27T16:48:23.140779Z

Updated

2021-11-27T17:05:57.24415Z

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