hey! I hope someone could help me!

I have a set of equations that I would like to solve with a program:

A = bd - zd^2

P = b + 2d v(1 + z^2)

R = A/P

V = 1/n * R^(2/3) *(1/2)

Q = A * V

I have already done it with the Multiple Equiation Solver, but I'd like to know if there's another way of doing it. This is what I did:

<<

{'A = bd - zd^2'

'P = b + 2d v(1 + z^2)'

'R = A/P'

'V = 1/n * R^(2/3) *(1/2)'

'Q = A * V'}

'EQ' STO

MINIT

MSOLVR

>>

And then I created another program to erase the variables that it stored:

<<

{A b d z P R V n S EQ Mpar Q}

PURGE

>>

Please help me, I think this is not the best way to do it!