Pangram checker: Difference between revisions
Content deleted Content added
m →{{header|Wren}}: Library name change. |
Added BaCon version. |
||
Line 539:
{{out}}
<pre>NOT A PANGRAM</pre>
==={{header|BaCon}}===
This can be done in a one-liner.
<lang bacon>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")</lang>
{{out}}
<pre>1
1
0
0
1
</pre>
=={{header|Batch File}}==
| |||