Mosaic matrix: Difference between revisions
→{{header|ALGOL 68}}: Simplify
Alextretyak (talk | contribs) (Added 11l) |
(→{{header|ALGOL 68}}: Simplify) |
||
Line 95:
=={{header|ALGOL 68}}==
<syntaxhighlight lang="algol68">
BEGIN # draw a "mosaic matrix" - one with a 1 in the top-left and then #
# alternating with another character vertically and horiontally #
# horiontally #
# draws a mosaic matrix with height and width = n using "1" and "." #
PROC draw mosaic = ( INT n )VOID:
▲ END # draw mosaic # ;
# test the draw mosaic procedure #
draw mosaic( 10 );
print( ( newline ) );
draw mosaic( 11 )
END
{{out}}
<pre>
Line 141 ⟶ 140:
1 . 1 . 1 . 1 . 1 . 1
</pre>
=={{header|Arturo}}==
| |||