Johan and Jonah are two boys' names (in the US) that are anagrams of one another.

Find at least three well known boys' names (in the US) that are anagrams of one another.

(In reply to Names by Math Man)

Math Man's comment made me notice my original misinterpretation. What's wanted is not three pairs, but rather a set of three anagrams. Modifying my original program:

Second part of program is now:

OPEN "boyname2.txt" FOR INPUT AS #1

l$ = ""
DO
  pp$ = p$
  p$ = l$
  LINE INPUT #1, l$
  IF LEFT$(l$, 15) = LEFT$(p$, 15) AND LEFT$(l$, 15) = LEFT$(pp$, 15) THEN PRINT MID$(pp$, 16, 16); MID$(p$, 16, 16); MID$(l$, 16, 16)
LOOP UNTIL EOF(1)

resulting in:

MICHAEL         MICHALE         MICHEAL
LEANDRO         LEONARD         RENALDO
ANDRE           ARDEN           DAREN
ARNOLDO         ORLANDO         ROLANDO
ARNOLD          ROLAND          RONALD
JOESPH          JOSEPH          JOSPEH
LEON            NOEL            OLEN

and from the program using the larger data base:

bard            brad            darb
abeu            aube            beau
barny           bryan           byran
michael         michale         micheal
dane            dean            edan
anders          andres          sander
arnoldo         orlando         rolando
arnold          orland          roland
orland          roland          roldan
roland          roldan          ronald
andros          sandor          sandro
amery           aymer           mayer
janos           jason           jonas
biron           brion           robin
bryon           byron           norby
peirce          perice          pierce
ernest          nester          sterne
linoel          lionel          nollie
neils           niels           niles
elvin           levin           nevil
elroy           leroy           roley
moore           omero           romeo
hort            roth            thor

 

Posted by Charlie on 2014-01-03 13:23:43