Problems? Is your data what you think it is? | |
PerlMonks |
Re: Vampire Numbersby Abigail-II (Bishop) |
on Jun 11, 2002 at 12:53 UTC ( [id://173452]=note: print w/replies, xml ) | Need Help?? |
Here's a piece of code that finds all Vampire numbers with
factors smaller than the argument given:
Note that if there is one vampire number (and there is), then we have an infinite number of vampire numbers. Proof: Suppose V = n * m is a vampire number. Then 10 * V = (10 * n) * m is a vampire number as well. qed. Abigail
Here are the vampire numbers with factors smaller than 100:
21 * 6 = 126 51 * 3 = 153 86 * 8 = 688 60 * 21 = 1260 93 * 15 = 1395 41 * 35 = 1435 51 * 30 = 1530 87 * 21 = 1827 81 * 27 = 2187 86 * 80 = 6880
In Section
Cool Uses for Perl
|
|