Try this by running from the programs folder.
Code: 
find -depth -type d | while read dir; do rar -a   ${dir}.rar ${dir}/* ; done