Floyd's triangle: Difference between revisions

m (→‎{{header|FreeBASIC}}: removed redundant code)
Line 1,786:
 
<lang Matlab>function floyds_triangle(n)
s = 1;
 
for k = 1 : n,
width = 1+floor(log10(nr*(nr+1)/2));
disp(s : s + k - 1)
for k=1:n,
s = s + k;
fprintf(stdout,' %*i',[width(ones(1,k));k*(k-1)/2+1:k*(k+1)/2]);
end;</lang>
fprintf(stdout,'\n');
{{out}}:
end;</lang>
gives the output:
<pre>
octave:22> floyds_triangle(5)
Anonymous user