perplexus.info :: General : Melting the ice

Melting the ice (Posted on 2011-09-01)

        let 	
       *ice
       melt
      edit
     euro  
     easily

In the above sentence the letter "E" represents a certain digit.
Other letters replace other digits, distinct from the digit assigned to E, but not as one-to-one function.

1. Find a solution (not necessarily mine).

Bonus
2. Devise a sentence that is more sensible or relevant for the above multiplication sample, but retains the value held by the letter "E"{or a corresponding letter in your solution} in same positions as in my original text.

No Solution Yet Submitted by Ady TZIDON

Rating: 5.0000 (1 votes)

Comments: ( Back to comment list | You must be logged in to post comments.)

all solutons (computer)

| Comment 2 of 12 |

E can be 3, 2 or 6. However, all the solutions in which E is 2 involve the words EDIT and EURO to be represented by the same 4-digit number--not specifically forbidden, but somewhat against the spirit of the puzzle.

CLS
OPEN "meltice2.txt" FOR OUTPUT AS #2
FOR numLet = 100 TO 999
e = (numLet \ 10) MOD 10
es$ = LTRIM$(STR$(e))
FOR ice = 100 TO 999
IF ice MOD 10 = e THEN
    melt = numLet * e
    melt$ = LTRIM$(STR$(melt))
    ix = INSTR(melt$, es$)
    IF ix = 2 AND LEN(melt$) = 4 THEN
      IF INSTR(MID$(melt$, 3), es$) = 0 THEN
        c = (ice \ 10) MOD 10
        edit$ = LTRIM$(STR$(numLet * c))
        IF LEFT$(edit$, 1) = es$ AND LEN(edit$) = 4 THEN
          IF INSTR(MID$(edit$, 2), es$) = 0 THEN
            i = (ice \ 100)
            euro$ = LTRIM$(STR$(numLet * i))
            IF LEFT$(euro$, 1) = es$ AND LEN(euro$) = 4 THEN
              IF INSTR(MID$(euro$, 2), es$) = 0 THEN
                easily$ = LTRIM$(STR$(numLet * ice))
                IF LEFT$(easily$, 1) = es$ THEN
                  IF INSTR(MID$(easily$, 2), es$) = 0 THEN
                     PRINT "   "; numLet
                     PRINT "   "; ice
                     PRINT " "; melt: PRINT " "; edit$: PRINT " "; euro$
                     PRINT numLet * ice
                     PRINT
                     PRINT #2, "   "; numLet
                     PRINT #2, "   "; ice
                     PRINT #2, " "; melt: PRINT #2, " "; edit$: PRINT #2, " "; euro$
                     PRINT #2, numLet * ice
                     PRINT #2,
                  END IF
                END IF
              END IF
            END IF
          END IF
        END IF
      END IF
    END IF
END IF
NEXT
NEXT

Posted by Charlie on 2011-09-01 17:50:10

Please log in:

Login:
Password:
Remember me:

Sign up! \| Forgot password

Search:

Search body:

Forums (1)
Newest Problems
Random Problem
FAQ | About This Site
Site Statistics
New Comments (10)
Unsolved Problems
Top Rated Problems
This month's top
Most Commented On

Chatterbox:


perplexus dot info