[Jprogramming] Piggy Bank

[Linda Alvord]

Please rempve a single blank line etween each line of code.  I'm not making
much sene of font sizes and linefeeds in Outlook 365   Linda

-----Original Message-----
From: programming-bounces at forums.jsoftware.com
[mailto:programming-bounces at forums.jsoftware.com] On Behalf Of Linda Alvord
Sent: Monday, November 17, 2014 10:39 PM
To: programming at jsoftware.com
Subject: [Jprogramming] Piggy Bank

Here is a worksheet I am developing for Grade 3.  In this grade students
learn about multiplication and division.  It is done using many concrete
examples.

 

Finding the values of a collection of coins can help to introduce
multiplication.

 

Enter this dialog in a jqt terminal.  To insure that you do not always get
the same sequence as you run it several times, enter ?13 or any different
random number before beginning the first run of the code.  If you answer yes
and print a page, you could fold over the answer and then have the student
write their name and answer before looking at the correct answer.

 

NB. Piggy Bank

TOSS=:?10#6

SY=:TOSS#'....ooo**@'

PIG=:6 20$' ' 

PIG=: ' _______/\_ ' 1 }PIG

PIG=: ' / BANK o\_ ' 2 }PIG

PIG=: ' ~~ ___ ____|' 3 }PIG 

PIGGY=: ' |_| |_| ' 4 }PIG

PIGGY

_______/\_ 

/ BANK o\_ 

~~ ___ ____|

|_| |_|

]COINS=:<6 10$(SC=:60?60){ALL60=:SY,(60-$SY)$' ' 

-----------┐

│*o*o @ ...│

│*o*o@ . o│

│ @ .. o o│

│.@ .o. │

│o @..o .o.│

│ . . *.*│

L-----------

PENNY=:'.'

NICKEL=:'O'

DIME=:'*'

QUARTER=:'@'

]TOSS

3 4 4 5 2 4 5 4 2 5

YES=:MONEY=:'$',": 0.01*+/TOSS*1 1 1 1 5 5 5 10 10 25

NB. How much money is in your piggy bank? 

NB. To see if you are right type YES.

 

----------------------------------------------------------------------
For information about J forums see http://www.jsoftware.com/forums.htm