$k=<>;//,map{$'*($'+1)/2<<$_==$k&&exit!print++$_+$'," 0"x$'," 1"x$_}@0for@0=0..32