Minimum number of cells after, before, above and below NxN squares: Difference between revisions

m
Line 792:
{{trans|BASIC256}}
<syntaxhighlight lang="qbasic">10 cls
20 call minab(2310)
30 end
40 sub min(a,b)
Line 800:
80 for i = 1 to n
90 for j = 1 to n
100 print using "###"; min(min(i-1,n-i),min(j-1,n-j));
110 next j
120 print
2,130

edits