Take notes on the command line: Difference between revisions

Content added Content deleted
(Take notes on the command line en FreeBASIC)
Line 1,586: Line 1,586:
end</lang>
end</lang>


=={{header|Mathematica}}==
=={{header|Mathematica}}/{{header|Wolfram Language}}==
<lang>If[Length[$CommandLine < 11], str = OpenRead["NOTES.TXT"];
<lang>If[Length[$CommandLine < 11], str = OpenRead["NOTES.TXT"];
Print[ReadString[str, EndOfFile]]; Close[str],
Print[ReadString[str, EndOfFile]]; Close[str],