\START85\
\COMMENT=Program file dated 01/10/96, 18:19
\NAME=Binomial
\FILE=BINOMIAL.85P
:ClLCD
:Disp "(Ax^V+By^W)^D"
:Prompt A
:Prompt V
:Prompt B
:Prompt W
:Prompt D
:For(R,0,D)
:ClLCD
:Outpt(1,1,(D nCr R)*(A^(D-R))*(B^R))
:Outpt(2,1,"x^")
:Outpt(2,3,V(D-R))
:Outpt(3,1,"y^")
:Outpt(3,3,W*R)
:Outpt(7,1,"Term:")
:Outpt(8,3,1+R)
:Pause 
:End
:ClLCD
:Stop
\STOP85\