macro
desil x
mconstant n i j k a l p q sisa desil
mcolumn x
let n=count(x)
#Mengurutkan data
do i=1:n
do j=1:n
if i > j and x(i) < x(j)
let x(i)=x(j)
let x(j)=a
endif
enddo
enddo
print x
#letak desil
do k=1:9
let l=k*(n+1)/10
let p=floor(l,0)
let q=p+1
let sisa=l-p
let desil=x(p)+(sisa*(x(q)-x(p)))
print k desil
enddo
endmacro
歓迎
Thanks to visit my Blog
ブログのアーカイブ
About Ekatsuki
- Eka Purnama
- Ƹ̵̡Ӝ̵̨̄Ʒ~✿~Ƹ̵̡Ӝ̵̨̄Ʒ~✿~Ƹ̵̡Ӝ̵̨̄Ʒ (`'·.¸ (`'·.¸*¤* ¸.·'´) ¸.·'´) لا إله إلا اللـه محمد رسول اللـه (¸.·'´ (¸.·'´*¤* `'·.¸) `'·.¸) Ƹ̵̡Ӝ̵̨̄Ʒ~✿~Ƹ̵̡Ӝ̵̨̄Ʒ~✿~Ƹ̵̡
Blog teman-temanQ
Situs Baca
Label:
Math 数学
Subscribe to:
Post Comments (Atom)
0 komentar:
Post a Comment