diff options
| author | James Smith <js5@sanger.ac.uk> | 2022-01-24 16:34:03 +0000 |
|---|---|---|
| committer | GitHub <noreply@github.com> | 2022-01-24 16:34:03 +0000 |
| commit | 0d01621b90240a4320aaf59d0a8f8434b2f9b510 (patch) | |
| tree | 20465ffbfb1898b07b199f1ea6fba0871f5b387a | |
| parent | b5c9bfe42e52ff7446069a103ba0874d3a8c0361 (diff) | |
| download | perlweeklychallenge-club-0d01621b90240a4320aaf59d0a8f8434b2f9b510.tar.gz perlweeklychallenge-club-0d01621b90240a4320aaf59d0a8f8434b2f9b510.tar.bz2 perlweeklychallenge-club-0d01621b90240a4320aaf59d0a8f8434b2f9b510.zip | |
Update README.md
| -rw-r--r-- | challenge-149/james-smith/README.md | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/challenge-149/james-smith/README.md b/challenge-149/james-smith/README.md index 475b4dfb28..f6404ea1ec 100644 --- a/challenge-149/james-smith/README.md +++ b/challenge-149/james-smith/README.md @@ -25,7 +25,7 @@ for( my($n,$ds,$i,$fa,$fb,%fib)=(@ARGV?$ARGV[0]:20,0,0,1,1,0,1,1,1); $n; $i++,$ds=0 ) { ## 1 $ds+=$_ foreach split //,$i; ## 2 ($fib{$fa+$fb},$fa,$fb)=(1,$fb,$fa+$fb) if $ds > $fb; ## 3 - (say $i)**$n-- if exists $fib{$ds}; ## 4 + $n--,say $i if exists $fib{$ds}; ## 4 } ``` |