The Calculus1 package maintains an internal table of problems that have been worked on (step by step) in the current session.  This table is not directly accessible, but you can obtain information about its contents.  Use WhatProblem to obtain the number of the current problem in the problems table.

The WhatProblem() command returns $\mathrm{-1}$ if there is no current problem (either the most recent current problem has been cleared by a call to Clear or there are no problems in the problems table).

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

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

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

$\mathrm{-1}$

$\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{WhatProblem}\left(\right)$

$2$

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

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

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

$1$