Skip to main content

Today's Friday Quiz problem. (spoilers)

W

ho doesn't enjoy a maths puzzle?

I receive a Friday Quiz that always has a maths puzzle for Q18.  Sometimes it's something you can't calculate, like the smallest number of postage stamps to make up a particular value. The kind I like best are the ones you can solve with equations and test the answer.  Sometimes it's possible to use a spreadsheet or write a computer program. 

Today's Q18 is the latter:

18. What is the lowest 3-digit number that increases in value by 75% when you reverse the order of the digits?

My Minstrel the Forth (Jupiter Ace clone) was out and I've been using this a lot recently, writing a game as well as testing my keyboard interface.

Spoiler alert: if you want to work it out for yourself, look away now. The answer is in the screenshots.

There's definitely room for optimisation (the program is listed at the bottom of this post) but the inability to use nested loops made for a clunkier program and more work to get it working properly. 

I hate to admit it but the BASIC version was way easier to write and is more elegant:   
 com+ 7 *  com- 4 *  =  if
works without floating point, but it's not as readable as 
if com=rev*1.75

I bashed this one out without too much thought and it worked first time.  The only real downside is that it took way longer than the Forth version (even with the Minstrel running at standard 3.25Mhz).   


Comments

  1. Be interested to hear how much faster the Forth version was, and why this might be!

    Doesn't seem like there's any shorts cuts other than 'brute force' try a load of values and see if they work.

    Good article and use of screen shots.

    ReplyDelete
  2. Thanks Rick. That's easy - Forth is compiled, and if it's a good implementation of Forth, it can run at near-assembly speeds. Looking back at the magazines from '82, this is the way that they marketed the Jupiter Ace (speed). In this case, the BASIC version was elegant though, due to the nested loops and floating point maths. I've since learned about using floats in Forth. that would have helped the Forth case, and a friend of mine did take a different approach to me (rather than looping three variables and constructing the forward and reverse numbers, he used one counter from 100-999 and calculated the reverse version from that) that was a much more elegant Forth solution.

    ReplyDelete

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...

How to convert images for TMS9918A graphics on the RC2014

For me, graphics capability is essential for an 8-bit computer. My graphics chip of choice for the RC2014 is the very capable TMS9918A. It has 15 colours, sprites, several modes and a max resolution of 256x192. It makes arcade-style games possible, such as Tut-Tut above.  I enjoy simply displaying images and have a bunch on my CF card (my 'hard drive') and have written image viewer and slideshow apps to display them. Some useful links: Convert9918 Tutorial of Convert9918's settings Multipaint J B Langston's TMS9918A video module my own TMSEMU video module my respository of TMS9918A software, games and .s2/.sc3 images Image conversion I did dabble in writing my own utility to convert .png images but then settled on the Multipaint app which can open a png in a MSX 'screen 2', allow you to tidy it up with paint tools and save as a .sc2 file. (An sc2 file is little more than a video-memory dump and so it's easy to blast that back into vram to display the image....