Colour bars/Display: Difference between revisions

no edit summary
No edit summary
Line 341:
60 NEXT
70 CALL &bb06 ' wait for key press</lang>
 
=={{header|Mathematica}}==
 
<lang mathematica>ArrayPlot[
ConstantArray[{Black, Red, Green, Blue, Magenta, Cyan, Yellow,
White}, 5]]</lang>
 
[[File:ColourBarsMathematica.png]]
 
=={{header|OCaml}}==