\newcounter{problem}
\setcounter{problem}{0}
\renewcommand{\theproblem}{\arabic{problem}}

\newcommand{\thepset}{\?}
\newcommand{\pset}[1]{\renewcommand{\thepset}{#1}}

\input{epsf}
\usepackage{amsmath,amsfonts,amssymb}
\usepackage{clrprogram}
\usepackage{mathrsfs}
\usepackage{fancyhdr}
\pagestyle{fancy}
\lhead{Nelson Elhage\\6.046J PS \thepset}
\rhead{Section M10\\Marten van Dijk}
\chead{Problem \thepset-\theproblem}

\newenvironment{problem}[1]{
\newpage
\addtocounter{problem}{1}
\subsubsection*{Problem \thepset-\theproblem. #1}
\renewcommand{\labelenumi}{(\alph{enumi})}
\begin{enumerate}
}{\end{enumerate}}