15 lines
230 B
Mathematica
15 lines
230 B
Mathematica
MODULE Telnet;
|
|
|
|
FROM InOut IMPORT WriteString, WriteLn, Read;
|
|
|
|
VAR exit : CHAR;
|
|
|
|
|
|
BEGIN
|
|
WriteString("Hello, World!");
|
|
WriteLn;
|
|
Read(exit);
|
|
END Telnet.
|
|
|
|
(* vim: set filetype=modula2: set nospell: set fileformat=dos: *)
|