7 lines
356 B
Text
7 lines
356 B
Text
DEF FN Pangram(x) = IIF(AMOUNT(UNIQ$(EXPLODE$(EXTRACT$(LCASE$(x), "[^[:alpha:]]", TRUE), 1))) = 26, TRUE, FALSE)
|
|
|
|
PRINT Pangram("The quick brown fox jumps over the lazy dog.")
|
|
PRINT Pangram("Jackdaws love my big sphinx of quartz.")
|
|
PRINT Pangram("My dog has fleas.")
|
|
PRINT Pangram("What's a jackdaw?")
|
|
PRINT Pangram("The five boxing wizards jump quickly")
|