新安程氏第十六世子响，仕隋，袭重安侯。祯明中领兵戌京口任忠谗于丞相张悌因罢兵归朝。公佯病狂以免祸。入隋，授开府。文帝访以江南风俗六代得失闻见嘉纳，顷之诏为太子少傅。帝曰：烦卿刚正辅吾子。不逮后太子勇以罪废，左迁扬威将军丹阳内史。炀帝即位，征还，道卒。娶陆氏吴郡，继娶平氏江宁，生二子翻、诩。