function [m,s]=findsum(k) s=0;m=0; while(s<=k), m=m+1;s=s+m; end end