Abt. Weitere Rätsel WR 22 "Ziffernschloß"
=========================================
Ein dreistelliges Ziffernschloss mit den Ziffern 1-9 versperrt dir den Weg: Wenn Du es knackst, gehören Dir 100 tEuro.
Du darfst dir höchstens 3 Hinweise holen, musst aber für jeden Hinweis 29.90 tEuro zahlen. Gratis gibt es nur folgenden Wink: Dein Vorgänger hat es geschafft, brauchte aber alle drei Hinweise!
Du holst dir den 1. Hinweis:
Spoiler anzeigen
Die einzugebenden Ziffern stehen nie in fallender Folge.
Kosten bisher: 29.90 tEuro
2. Hinweis gefällig?
Spoiler anzeigen
2. Das Produkt der drei Codeziffern ist 36.
Kosten bisher: 59.80 tEuro
Hier könntest Du mit 50% Chance lösen und 40.20 Euro kassieren...
Oder du holst dir den 3. Hinweis?
Spoiler anzeigen
3. Hinweis: Die größte Ziffer gibt es nur einmal.
Geschafft?
Wenn ja: Gratulation. Hier gehts zur Lösung:
Spoiler anzeigen
Einkünfte 100 tEuro - Kosten 89.70 tEuro = Gewinn 10,30 tEuro - Immerhin!
WindowTitle "WR 22: Ziffernschloss"
cls
declare i&,j&,k&, s&, hinweis%
Print "\n Vor 3. Hinweis noch nicht entscheidbar:\n"
Whileloop 0,1:Hinweis%=&Loop
whileloop 9:i&=&Loop:whileloop 9:j&=&Loop:whileloop 9:k&=&Loop
case i&>j&:continue:case j&>k&:continue:case (i&*j&*k&)<>36:continue
IF HINWEIS%
case (j&=k&) or (i&=k&):continue
endif
s&=i&+j&+k&
FONT 2*(s&=13)
print i&,j&,k&," Summe: ";s&
endwhile
endwhile
endwhile
beep:waitinput 3000
print "\n Nach Hinweis eindeutig.\n"
endwhile
waitinput
Alles anzeigen