updated programs.rst
added codeblock