Data update
This commit is contained in:
parent
796d366b97
commit
35bcdeebf8
504 changed files with 7045 additions and 610 deletions
30
Task/Pangram-checker/EasyLang/pangram-checker.easy
Normal file
30
Task/Pangram-checker/EasyLang/pangram-checker.easy
Normal file
|
|
@ -0,0 +1,30 @@
|
|||
func pangr s$ .
|
||||
len d[] 26
|
||||
for c$ in strchars s$
|
||||
c = strcode c$
|
||||
if c >= 97 and c <= 122
|
||||
c -= 32
|
||||
.
|
||||
if c >= 65 and c <= 91
|
||||
d[c - 64] = 1
|
||||
.
|
||||
.
|
||||
for h in d[]
|
||||
s += h
|
||||
.
|
||||
return s
|
||||
.
|
||||
repeat
|
||||
s$ = input
|
||||
until s$ = ""
|
||||
print s$
|
||||
if pangr s$ = 26
|
||||
print " --> pangram"
|
||||
.
|
||||
print ""
|
||||
.
|
||||
input_data
|
||||
This is a test.
|
||||
The quick brown fox jumps over the lazy dog.
|
||||
The quick brown fox jumped over the lazy dog.
|
||||
QwErTyUiOpAsDfGhJkLzXcVbNm
|
||||
5
Task/Pangram-checker/Icon/pangram-checker-3.icon
Normal file
5
Task/Pangram-checker/Icon/pangram-checker-3.icon
Normal file
|
|
@ -0,0 +1,5 @@
|
|||
(function pangram? sentence
|
||||
(let prepped (-> sentence lower-case to-vec))
|
||||
(all? prepped (map char-code (range 97 123))))
|
||||
|
||||
(pangram? "The five boxing wizards jump quickly.")
|
||||
Loading…
Add table
Add a link
Reference in a new issue