Sorting Data (Macro Mititab)

MACRO

urut X

MCOLUMN X

MCONSTANT n i j sikecil

name X'data' n'banyaknya data'

let n=count(X)

do i=1:n-1

      do j=i+1:n

            if X(i)>X(j)

                  let sikecil=X(j)

                  let X(j)=X(i)

                  let X(i)=sikecil

            endif

      enddo

enddo

print X n

ENDMACRO