The Calculus1 package maintains an internal table of problems stepped through in the current session.  This table is not directly accessible, but you can obtain information about its contents.

The GetNumProblems() command returns an expression sequence of two non-negative integers.  The first integer is the number of problems in the internal table that have not been cleared by a call to Clear.  The second integer is the total number of problems in the internal table.

The Clear(all) command resets both numbers returned by the GetNumProblems routine to 0 (zero).

$\mathrm{with}\left(\mathrm{Student}\left[\mathrm{Calculus1}\right]\right)\:$

$\mathrm{infolevel}\left[\mathrm{Student}\left[\mathrm{Calculus1}\right]\right]≔1\:$

$\mathrm{GetNumProblems}\left(\right)$

$0,0$

$\mathrm{Rule}\left[\mathrm{`+`}\right]\left(\mathrm{Diff}\left(x^2+x\,x\right)\right)$

Creating problem #1

$\frac{\ⅆ}{\ⅆx}\left(x^2+x\right)=\frac{\ⅆ}{\ⅆx}\left(x^2\right)+\frac{\ⅆx}{\ⅆx}$

$\mathrm{Rule}\left[\mathrm{`c*`}\right]\left(\mathrm{Int}\left(3x^2\,x\right)\right)$

Creating problem #2

$\int 3x^2\ⅆx=3\left(\int x^2\ⅆx\right)$

$\mathrm{GetNumProblems}\left(\right)$

$2,2$

$\mathrm{Clear}\left(1\right)$

Problem #1 has been cleared

$\mathrm{GetNumProblems}\left(\right)$

$1,2$

$\mathrm{Clear}\left(\mathrm{all}\right)$

$\mathrm{GetNumProblems}\left(\right)$

$0,0$