Fortran为一个分数计算0

Question

PROGRAM TRYY

implicit none

REAL:: x_value=2
REAL:: y_value=3
REAL:: answer

IF ((x_value >= 0 .AND. x_value < 10) .AND. (y_value >= 0 .AND. y_value < 10)) THEN
  answer = (1/3)*(x_value) + (1/2)*(y_value)
  WRITE(*,*) answer
ELSE
  WRITE(*,*)
END IF

STOP
END PROGRAM TRYY

这应该是2.16667，但它读取0，因为那里有分数。分数为（1/3）和（1/2）。当我分别将它们改为0.3和0.5时，它给了我2.1

我不希望这样。我想（1/3）和（1/2）工作。发生了什么事？