RosettaCodeData/Task/Input-loop/Mathematica/input-loop.math
2023-07-01 13:44:08 -04:00

3 lines
88 B
Text

stream = OpenRead["file.txt"];
While[a != EndOfFile, Read[stream, Word]];
Close[stream]