Four sides of square: Difference between revisions

m
(Added Arturo implementation)
Line 100:
<lang rebol>drawSquare: function [side][
loop 1..side 'x ->
print join.with:" " map 1..side 'y [
(any? @[x=1 y=1 x=side y=side])? -> 1 -> 0
]
1,532

edits