[magicku]

No.12
clear;clc
n=input('n=');
X=[1,n+1];
X(1)=input('X0=');
for i=1:n
X(i+1)=X(i)*(1-X(i));
end
X

No.13
clear;clc
k=input('k=');
n=input('n=');
X=(10*rand(1,n));
t=find(X>=k);
a=X(t);
mean(a)
X
a

No.14
clear;clc
s=input('s=');
n=input('n=');
X=(10*rand(1,n));
X
t=find(abs(X)<s);
X(t)=0;
X