Minimum number of cells after, before, above and below NxN squares: Difference between revisions
Minimum number of cells after, before, above and below NxN squares (view source)
Revision as of 17:00, 26 March 2023
, 1 year ago→{{header|Chipmunk Basic}}
(Added Applesoft BASIC and Chipmunk Basic) |
|||
Line 792:
{{trans|BASIC256}}
<syntaxhighlight lang="qbasic">10 cls
20 call minab(
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
|