(use slib)(while(read)=> n(require'#0=printf)(if(< n 1024)(print n)(if(< n #1=1048575.9)(#0#"%.2f KB
"(/ n 1024))(#0#"%.2f MB
"(/ n #1#)))))