Anonymous user
Create a file on magnetic tape: Difference between revisions
no edit summary
(Added solution for Action!) |
No edit summary |
||
Line 204:
close(f);
end.
</lang>
=={{header|F#}}==
<lang fsharp>
open System
open System.IO
let env = Environment.OSVersion.Platform
let msg = "Hello Rosetta!"
match env with
| PlatformID.Win32NT | PlatformID.Win32S | PlatformID.Win32Windows | PlatformID.WinCE -> File.WriteAllText("TAPE.FILE", msg)
| _ -> File.WriteAllText("/dev/tape", msg)
</lang>
| |||