Pour energy into 1 kg of ice and watch the temperature climb, then stall on the melting and boiling plateaus while the heat goes into breaking bonds (Q = mL), then climb again (Q = mcΔT).