Skill up

//Ti-Basic

Input "SKILL UP=",K   //Number of skill up you want
Input "*2? (YES=1, NO=0)",I   //Asking for the skill boost
1->N
0->G

If I=1    //Testing if there is the skill boost
Then
0.2->P
Else
0.1->P
End

While G<1
1-binomcdf(N,P,K-1)->G   // binomFrép in french
N+1->N
End

Disp N //Number of monsters you have to feed to obtain K skill up