From mboxrd@z Thu Jan 1 00:00:00 1970 X-Spam-Checker-Version: SpamAssassin 3.4.4 (2020-01-24) on polar.synack.me X-Spam-Level: X-Spam-Status: No, score=-1.9 required=5.0 tests=BAYES_00 autolearn=unavailable autolearn_force=no version=3.4.4 Path: eternal-september.org!reader01.eternal-september.org!reader02.eternal-september.org!news.eternal-september.org!mx02.eternal-september.org!feeder.eternal-september.org!newsfeed.fsmpi.rwth-aachen.de!newsfeed.straub-nv.de!news-1.dfn.de!news.dfn.de!news.uni-weimar.de!medsec1.medien.uni-weimar.de!lucks From: Stefan.Lucks@uni-weimar.de Newsgroups: comp.lang.ada Subject: Re: If not Ada, what else... Date: Wed, 29 Jul 2015 19:07:10 +0200 Organization: Bauhaus-Universitaet Weimar Message-ID: References: <87y4io63jy.fsf@jester.gateway.sonic.net> <7a29d3e9-d1bd-4f4a-b1a6-14d3e1a83a4d@googlegroups.com> <87mvz36fen.fsf@jester.gateway.sonic.net> <2215b44f-8a89-47c6-a4c4-52b74d2dac45@googlegroups.com> <9e492c82-868d-43d3-a18a-38274400e337@googlegroups.com> <40184feb-4053-4ac3-8eaa-c3bd9cd8a77c@googlegroups.com> <10272577-945f-4682-85bc-8ad47f3653ae@googlegroups.com> <87si8i81k2.fsf@atmarama.net> <8076cbd0-2655-4c98-b70e-cb5f0c32e4ba@googlegroups.com> <5e6cb30b-5f8c-4fed-969e-3941315ecba0@googlegroups.com> <87si87nf8k.fsf@jester.gateway.sonic.net> NNTP-Posting-Host: medsec1.medien.uni-weimar.de Mime-Version: 1.0 Content-Type: multipart/mixed; BOUNDARY="8323329-1485591333-1438189630=:9222" X-Trace: pinkpiglet.scc.uni-weimar.de 1438190171 17698 141.54.178.228 (29 Jul 2015 17:16:11 GMT) X-Complaints-To: news@pinkpiglet.scc.uni-weimar.de NNTP-Posting-Date: Wed, 29 Jul 2015 17:16:11 +0000 (UTC) X-X-Sender: lucks@debian In-Reply-To: <87si87nf8k.fsf@jester.gateway.sonic.net> User-Agent: Alpine 2.20 (DEB 67 2015-01-07) Xref: news.eternal-september.org comp.lang.ada:27132 Date: 2015-07-29T19:07:10+02:00 List-Id: --8323329-1485591333-1438189630=:9222 Content-Type: text/plain; charset=ISO-8859-15; format=flowed Content-Transfer-Encoding: QUOTED-PRINTABLE On Wed, 29 Jul 2015, Paul Rubin wrote: > Here is an exercise that is easy in Haskell but surprisingly tedious in > languages like Ada: a number is "5-smooth" or "Hamming" if it has no > prime factors greater than 5. So 10, 12, and 15 are 5-smooth but 11, > 13, and 14 are not. The first 20 Hamming numbers are: > > [1,2,3,4,5,6,8,9,10,12,15,16,18,20,24,25,27,30,32,36] > > I was going to ask for the millionth such number, but you need arbitrary > precision arithmetic for it. So, what is the 10000th such number? That > one fits in 64 bits, but is not really feasible to reach by counting. > http://rosettacode.org/wiki/Hamming_numbers#Ada -------- I love the taste of Cryptanalysis in the morning! -------= - www.uni-weimar.de/de/medien/professuren/mediensicherheit/people/stefan-luck= s ----Stefan.Lucks (at) uni-weimar.de, Bauhaus-Universit=E4t Weimar, Germany-= --- --8323329-1485591333-1438189630=:9222--