Here is the program I've made:

Define sn()= Prgm Disp 2 EndPrgm

Then, on the left side of the double window, I call sn():

sn()

and the calculator only displays on the screen "Done". As if the program I wrote didn't exist.

I have not forgotten to save the program.

If anyone could help me.

Thanks in advance!

Note: I'd like to add that there is a star (*) to the left of my program's name on the right-hand side of the double screen.

So now I want to remove the os protection or flash it to downgrade the os and install Ndless.

I'm willing to buy the USB/TTL interface.

Thank you!

SLOPEFLD (graph the slope field for a differential equation y f(x, y)) Input: Differential equation y f (x, y)
Output: Slope field for the differential equation
This program draws slope fields on both the TI-82 and TI-83.
Prgm SLOPFLD :10→L
:10→W :(YmaxYmin) /L→V :(XmaxXmin) /W→H :ClrDraw
:FnOff
:0→R
:YminV/2→Y
:Lbl 1
:R1→R
:0→C
:XminH/2→X
:Lbl 2
:C1→C
:Y →M 1
:M*H/4Y→S :M*H/4Y→T :XH/4→P :XH/4→Q
:If abs (TS) .7V :Goto 3
:Lbl 4
:Y→Z
:Line (P, S, Q, T) :Z→Y
:XH→X
:If CW
:Goto 2 :YV→Y :If RL :Goto 1 :Stop

:Lbl 3 :Y.35V→T :Y.35V→S :(TY) /MX→Q :(SY) / MX→P :Goto 4
Program by: Mark Howell, Gonzaga School, Washington, D.C.

I'm wondering if there is any solution for this

My program is suvat as in make your choice s,u,v,a,t.
I need three letters from suvat to solve a problem.
nCR(5,3) gives 10 combinations I assign to numbers 1-10.

num=seq(x,x,1,n),n
Request ("what is your number?"),n
if num[n]=n then
goto block

Every time I want to solve a problem I need to look up the block number to use.

My question: is there another way to do this kind of thing?
I'm trying to learn how to use this calculator.

Anyone that can help me write some programs? The first one needs to be a program that shows the prime numbers between two parameter (a,b).
Got 3 more programs to write after.
Can pay (small) if someone wants to do it for me

Here is the HP Prime Code that works
n-Erlang distribution (see also Gamma and exponential)

Code:

EXPORT erlang(k,l,n)
// n-Erlang distribution k shape parameter, l=λ >=0 rate parameter
// from Gamma d.; if k=1 -> erlang(1,l,n) = exponential(l,n)
// erlang(k,λ) = gamma(k,1/λ)
BEGIN
local f;
f:=piecewise(n<0,0, l<0, 0, ((l^k)*(n^(k-1)*e^(-l*n)))/(k-1)! );
END;

EXPORT erlang2(k, m, n)
k shape parameter, m=μ=1/λ >=0 scale parameter
if μ=2 -> chi2 with 2k degree of freedom
BEGIN
local f;
f:=piecewise(n<0,0, m<0, 0, (n^(k-1)*e^(-n/m))/((m^k)*(k-1)!));
END;

EXPORT erlang_cdf(k, l, n)
// k shape parameter, l=λ >=0 rate parameter (μ=1/λ)
BEGIN
local f;
f:= 1- sum((1/X!)*(e^(-l*n))*(l*n)^X,X,0,k-1);
END;

And this is what I tried to do for one of them for the Nspire but I am getting an Argument Error

Define erlang(k,l,n)=
Prgm
local f
f:=piecewise(n<0,0, l<0, 0, ((l^k)*(n^(k-1)*e^(-l*n)))/(k-1)! )
EndPrgm

It seems to look correct and is able to have a "Stored Success" but I feel like I'm doing something wrong. I would really like some help here.

Thanks.

1.

to

1

round(1.,0)

int(1.)

1.

1

Define LibPub funvarsolv()= Prgm :Local y1,res,i,ab,d,c : :Loop :0→c :1→d :While d =1 :Try :RequestStr "enter function",y1,0,ab :0→d : :Else :© user left input box empty :Text "you entered nothing",0 :ClrErr : :EndTry :If d=0 :Exit :EndWhile :© user pressed cancel : If ab=0 Then : Disp "Press ENTER to end" : subrtine\delay() : DelVar y1,i,k,ab : Return : :EndIf : : : : expr("Define y1(x) ="&y1) : res:=exp▶list(solve(y1(x)=0,x),x) : :Disp "Solution set: "&var&" =",res : :subrtine\dlay() :If k="esc" Then :1→c :ElseIf k="enter" Then :0→c :EndIf :If c=1 :Exit :EndLoop :EndPrgm

#include <iostream> using namespace std; int mul_inv(int a, int b) { int b0 = b, t, q; int x0 = 0, x1 = 1; if (b == 1) return 1; while (a > 1) { q = a / b; t = b, b = a % b, a = t; t = x0, x0 = x1 - q * x0, x1 = t; } if (x1 < 0) x1 += b0; return x1; } int main(void) { cout<<mul_inv(42, 2017)<<endl; return 0; }

in my TI-Nspire CX So far I have the following code but am getting variable not defined in if statement.

Here is the code I have in my Nspire CX so far.

Define LibPub modinv(a,b)= Func Local b0,t,q,x0,x1 0→x0 1→x1 If b=1 Then Return 1 EndIf While a>1 q:=((a)/(b)) t:=b b:=mod(a,b) a:=t t:=x0 x0:=x1-q*x0 x1:=t EndWhile If x1<0 Then x1:=x1+b0 EndIf Return x1 EndFunc

the inspire is throwing an error on this line.

 If x1<0 Then x1:=x1+b0 EndIf

Not sure what I am doing wrong here! Any insight would be appreciated!