Take notes on the command line: Difference between revisions
Content deleted Content added
Not a robot (talk | contribs) Add SETL |
PascalABC.NET |
||
Line 2,785:
Done: coded notes.pas for RC. It was quick.
</pre>
=={{header|PascalABC.NET}}==
<syntaxhighlight lang="delphi">
begin
//Print(ParamStr(1));
if ParamCount = 0 then
System.IO.File.ReadAllText('Notes.txt').Print
else begin
System.IO.File.AppendAllText('Notes.txt',DateTime.Now.ToString);
var s := (1..ParamCount).Select(i -> ParamStr(i)+NewLine).JoinToString;
s := #9 + NewLine + s;
System.IO.File.AppendAllText('Notes.txt',s);
end;
end.
</syntaxhighlight>
=={{header|Perl}}==
| |||