Skip to main content

Friday Quiz maths question 8 Jul 22

 

Homany three-digit numbers are there where the middle digit is lower than both the first digit and the third digit?


My reaction to this is to loop through all of the numbers 100-999 and count the ones that pass the test.

(yes, lines 40 and 45 look a little inelegant with that repetition, but I tried it with a goto (yuk) and gosub and this was the shortest and neatest of my variations.  I wanted to print the qualifying numbers as well as inc'ing the count).


I remember a very similar question in the past, involving 3-digit numbers. I think it was Mr Beckett who used a single loop in Forth and wrote words to separate out the hundreds, tens and units.  (Seemed a little counter-intuitive to me but Forth doesn't allow you access to the indices of three nested loops). So I thought I'd give that a go to see whether it would be more elegant than the BASIC version. 



Here are my 'hundreds', 'tens' and 'units' words (made easier as the default type in Ace Forth is an integer) and the 'run' loop. The zero at the start is my counter, conveniently at the top of the stack at the point where I want to increment it.

As you can see, it arrived at the same answer, 285, so I'm sure that's the right answer.

This leaves me very curious about how the question setter expected people to solve this, if not by an automated 'loop and count'.

Looking at the numbers that both programs produce, it might be possible to go through and reason it out - ie "in the 100's, only 10x will qualify, so that's 9" and so on, but that seems very longwinded.  

Any thoughts on this?

Do you have any alternative programs in other languages / other systems?

Update: 

Thanks to people joining in on twitter, we had this serious improvement on the basic program:

10 for i = 0 to 8

20 for j = i+1 to 9

30 for k = i+1 to 9

.. which removes the need for a test as it only gives numbers where hundreds and units are > tens

Following on from this, and thanks to several friends, it became clear that we can use:

 1^2 + 2^2 etc

The clearest explanation for this is from Mr A, who said:

Middle = 8, Perms = 1 (989)

Middle = 7, Perms = 4 (878, 879, 978, 979)

Middle = 6, Perms = 9 (767, 768, 769, 867, 868, 869, 967, 968, 969)




Comments

  1. Hi. Loving the Quiz questions (and answers). Do you mind me asking where they are published?
    I have built an RC65(C)02 with Tali Forth 2 (65c02 only) so keen to have a go (it's just too tempting to have a peek at your answers first).

    ReplyDelete
    Replies
    1. Hi Reggie, glad you enjoy these. The quiz is put together by a friend of a friend, I'm not sure of the protocol for giving the details publicly, but if you write to me at shieladixon@gmail.com I'll let you know.
      I'd love to know more about your computer, have you published the details anywhere?

      Delete

Post a Comment

Popular posts from this blog

RC2024/10 - my entry

A while ago I made this MIDI module for RC2014: It works but a better design would have its own serial chip and port decoding.  As it is, it provides the MIDI interface and a clock signal for the second SIO2 serial port. This means that it requires a little setting up and will only work for RC2014s with an SIO2 (and port B not already used). I think people might reasonably expect it to be plug-and-play and self-contained, ie do all the serial itself. My challenge to myself is to:  learn how to connect a serial chip (probably 68B50 ACIA) to receive the incoming MIDI and to serialise outgoing MIDI design the module, including the port decoding write a library so that it can easily be used on any RC2014. Potential applications include a MIDI sequencer and using incoming MIDI to trigger notes on the AY or SID sound chips. Entering the Retro Challenge 2024 (aka RC2024/10)  has given me an incentive to get on with this! I'm happy to see several more entries in the RC2014 catego...

IM53 8080 birthday cake

 Each year I've been trying to get more creative with ideas for Spencer's birthday cake. The plan this year was to incorporate LEDs in place of candles. I eventually settled on an Altair / IMSAI / PDP -style computer since those are the type of computers that inspired his RC2014. The IMSAI 8080 has the most colourful switches as well as a name that I could twist. The thought that it could show randomly flashing lights (as if the computer were running) and that it could also play a game of 'kill the bit' was very appealing. A plan formed to use a capacitive touch pad on the cake itself. The first job is to bake the fruitcake. I often use a 7" square tin and one of those cut in half and rearranged makes a cake of suitable proportions.  Even after taking a slice off the faces to make them nice and square, there are still some rounded corners, so after putting on the marzipan, I used more marzipan as a filler to flatten the whole thing. Even though I wanted to end up w...

New MSX graphics / sound / joystick module for RC2014 / RCBus

I'm impressed at what Les has packed onto this standard-sized module. It contains an FPGA replacement for the TMS9918A, a YM/AY sound module and joystick interface.  The project is open-source and is here . In MSX terms this is the VDP (vidio display processor) and PSG (programmable sound generator), thus being an alternative for both the J B Langston TMS9918A video module and Ed Brindley's YM/AY sound module and adds two joystick ports to boot. All on a single module for RC2014 or compatible computers. There's no room for the d-sub joystick ports, so headers are provided so that these ribbon cables can be used.  This is a neat solution for those wishing to take advantage of Les' MSX8 system , which loads most MSX rom files along with a modified MSX BIOS from CP/M on a ROMWBW RC2014.  It is hard-wired to the MSX ports for the sound and video, so it won't be suitable for those wanting to run Colecovision ROMs, for example. I'm torn myself between the real TMS ...