( Quizzie 2-a, page 55 )

( 1 )
a b + c *

( 2 )
a 3 * b - 4 / c +

( 3 )
a b * 200 /

( 4 )
n 1 + n /

( 5 )
7 x * 5 + x *

( 6 )
( [a-b]/[b+a] )

( 7 )
( a / 10b )


( Quizzie 2-b, page 59 )

( 1 is already given)

( c a b -- result )
: 2b2  4 * - 6 / + ;

( a b -- result )
: 2b3  8 * / ;

( a b -- result )
: 2b4  * 200 / ;

( a a -- result )
: 2b5  2 * 3 + * ;
( or )
( a -- result )
: 2b5  dup 2 * 3 + * ;

( c a b )
: 2b6  - swap / ;


( Quizzie 2-c, page 69 )

( a b c -- c b a )
: 2c1  swap rot ;

( a b -- a b a )
: 2c2  swap dup rot rot ;

( a b c -- c a b )
: <rot  rot rot ;
: 2c3  <rot ;

( n -- result )
: 2c4  dup 1 + swap / ;

( x -- result )
: 2c5  dup 7 * 5 + * ;

( for this one, i start by factoring out the a first, so the expression becomes:
  a[9a - b]
)
( a b -- result )
: 2c6  swap dup 9 * rot - * ;
( looks like I reimplemented rot by accident. The book's solution is cleaner imo. )
