let rec f i j=i<=j&(Printf.printf"%d
"i;f(i+1)j);;Scanf.scanf"%d,%d"f