|
|
Een hexadecimaal getallen puzzeltje |
|
|
Vraag:
Vind hexadecimale getallen waarin een cijfer hoogstens één maal voorkomt
en waarvan elk cijfer een deler is.
Opmerking: Het gaat om de cijfers 1..F, het cijfer 0 komt niet voor.
Dit kleine Delphi project helpt.
download Delphi project
download programma
Plaatje hieronder toont het programma aan het werk.
Werkwijze
Het getal wordt verhoogd (verlaagd) met de grootste gemeenschappelijke deler van de geselecteerde cijfers.
Daarna volgt een test of een cijfer één maal voorkomt.
Het getal heeft het Int64 formaat.
Omdat shift operaties op 64 bit integers niet goed door Delphi-7 worden verwerkt
splits ik zo'n 64 bit getal soms even op in twee 32 bit integers.
Als alle getallen onderzocht zijn wordt een nieuwe combinatie van cijfers gekozen.
Zie de Delphi source code voor details.
|
|