2 lines
109 B
Text
2 lines
109 B
Text
|
include "ConsoleWindow":dim a$:open "Unix",1,"cal 10 2018":do:line input #1,a$:print a$:until eof(1):close 1
|