18 lines
553 B
Plaintext
18 lines
553 B
Plaintext
HOW TO REPORT word can.be.made.with blocks:
|
|
FOR letter IN upper word:
|
|
IF NO block IN blocks HAS letter in block: FAIL
|
|
REMOVE block FROM blocks
|
|
SUCCEED
|
|
|
|
PUT {"BO";"XK";"DQ";"CP";"NA";"GT";"RE";"TG";"QD";"FS"} IN blocks
|
|
PUT {"JW";"HU";"VI";"AN";"OB";"ER";"FS";"LY";"PC";"ZM"} IN blocks2
|
|
FOR block IN blocks2: INSERT block IN blocks
|
|
|
|
PUT {"A";"BARK";"BOOK";"treat";"common";"Squad";"CoNfUsE"} IN words
|
|
|
|
FOR word IN words:
|
|
WRITE word, ": "
|
|
SELECT:
|
|
word can.be.made.with blocks: WRITE "yes"/
|
|
ELSE: WRITE "no"/
|