I have good news & bad news with the attached code which I will discuss
Code: {1,3,5,7→⌊TEMP4
{1,7→⌊JONL1
SetUpEditor⌊T8
0→dim(⌊T8
For(N,1,dim(⌊TEMP4
prod(seq(⌊JONL1(X)≠⌊TEMP4(N),X,1,dim(⌊JONL1→⌊T8(N
End
ClrHome
Output(1,1,"N
Output(1,5,N
Output(2,1,"T8
Output(2,8,⌊T8
Output(3,1,"T4
Output(3,8,⌊TEMP4
Output(4,1,"OV
Output(4,5,⌊OVER1
Pause
ClrHome
(⌊TEMP4*⌊T8)→⌊T8
Output(2,1,"T8
Output(2,8,⌊T8
Pause
ClrHome
SortD(⌊T8
sum(⌊T8≠0)→dim(⌊T8
SortA(⌊T8
Output(1,1,⌊T8
Code: prod(seq(⌊JONL1(X)≠⌊TEMP4(N),X,1,dim(⌊JONL1→⌊T8(N
originally looked like this
Code: prod(seq(⌊JONL1(X)≠⌊TEMP4(N),X,1,dim(⌊JONL1→T8(N
Thus the loop never ran. With that fix the loop ran. In this list of output statements I display the results
Code: Output(1,1,"N
Output(1,5,N// 5
Output(2,1,"T8
Output(2,8,⌊T8//{0,1,1,0}
Output(3,1,"T4
Output(3,8,⌊TEMP4//{1,3,5,7}
Output(4,1,"OV
Output(4,5,⌊OVER1//{1,7}
Now the results of the second Output statements
Code: Output(2,1,"T8
Output(2,8,⌊T8 //{0,3,5,0}
the final line of code produced this
Code: Output(1,1,⌊T8 // {3,5} instead of {1,0,0,7}