Theory of the diamagnetism above the critical temperature for cuprates