Find the longest word (preferably in English) using no consonants other than
D &
N.
Having thought of "denuded" before writing the program, I had it show all the words in my word list that met the given criterion and had at least seven letters. They are, with their lengths:
addenda 7
adenine 7
adenoid 7
aeonian 7
annoyed 7
anodyne 7
deadened 8
deadeye 7
denuded 7
deodand 7
doyenne 7
duodena 7
ennuyee 7
innuendo 8
innuendoed 10
nandina 7
nonunion 8
noonday 7
unaided 7
undenied 8
unended 7
unideaed 8
unneeded 8
unyeaned 8
The largest, as you see, is "innuendoed".
Open "c:\words\words.txt" For Input As #1
Do
Line Input #1, w$
If Len(w) > 6 Then
good = 1
For i = 1 To Len(w)
If InStr("aeiouydn", Mid(w, i, 1)) = 0 Then good = 0: Exit For
Next
If good Then Text1.Text = Text1.Text & w & Str(Len(w)) & crlf
End If
DoEvents
Loop Until EOF(1)
|
|
Posted by Charlie
on 2019-02-25 14:58:33 |
words from my computer's word list (spoiler)