program Project1; uses windows; begin WinExec('telnet.exe', SW_SHOW) end.
program Project1; uses windows; begin WinExec('net start telnet', SW_SHOW) end.