Better Idea

Use while loop

   Do
   Read (*,*) Temp
       If ((1 <= Temp) .and. (Temp <= 100)) Exit
       Write (*,*) 'You did not type a valid input. Please try again.'
   End Do

Now write similar code for Pressure and Volume.