NAME

Project::Euler::Problem::P002

VERSION

Version v0.1.1

SYNOPSIS

http://projecteuler.net/index.php?section=problems&id=2

use Project::Euler::Problem::P002;
my $p2 = Project::Euler::Problem::P002->new;

my $default_answer = $p2->solve;

DESCRIPTION

This module is used to solve problem #002

This is a simple problem which computes the fib numbers upto a certain maximum and sums all of them that are even (or as implemented here, divisible by every multi_nums)

Problem Attributes

Multiple Numbers

An array of positive numbers that are used to filter out the fib numbers

[2]

SETUP

Problem Number

002

Problem Name

Sum filtered fib numbers

Problem Date

2001-10-19

Problem Desc

Each new term in the Fibonacci sequence is generated by adding the previous two terms. By starting with 1 and 2, the first 10 terms will be:

1, 2, 3, 5, 8, 13, 21, 34, 55, 89, ...

Find the sum of all the even-valued terms in the sequence which do not exceed four million.

Default Input

Max number to go up to: 4,000,000

Default Answer

4,613,732

Has Input?

Yes

Help Message

You can change multi_nums to alter the way the program will function. If you are providing custom_input, don't forget to specify the wanted_answer if you know it!

INTERNAL FUNCTIONS

Validate Input

The restrictions on custom_input

A positive integer

Solving the problem

Use Math::Big to find fib numbers upto $max, filter them, and find the sum

AUTHOR

Adam Lesperance, <lespea at cpan.org>

BUGS

Please report any bugs or feature requests to bug-project-euler at rt.cpan.org, or through the web interface at http://rt.cpan.org/NoAuth/ReportBug.html?Queue=Project-Euler. I will be notified, and then you'll automatically be notified of progress on your bug as I make changes.

SUPPORT

You can find documentation for this module with the perldoc command.

perldoc Project::Euler::Problem::P002

ACKNOWLEDGEMENTS

Math::Big

COPYRIGHT & LICENSE

Copyright 2009 Adam Lesperance.

This program is free software; you can redistribute it and/or modify it under the terms of either: the GNU General Public License as published by the Free Software Foundation; or the Artistic License.

See http://dev.perl.org/licenses/ for more information.