Create a file on magnetic tape: Difference between revisions
Content added Content deleted
No edit summary |
(added a solution for D) |
||
Line 76: | Line 76: | ||
END-WRITE |
END-WRITE |
||
STOP RUN.</lang> |
STOP RUN.</lang> |
||
=={{header|D}}== |
|||
<lang D>import std.stdio; |
|||
void main() { |
|||
version(Windows) { |
|||
File f = File("TAPE.FILE", "w"); |
|||
} else { |
|||
File f = File("/dev/tape", "w"); |
|||
} |
|||
f.writeln("Hello World!"); |
|||
}</lang> |
|||
=={{header|Fortran}}== |
=={{header|Fortran}}== |