PROGRAM Aritmetik_Operatorler
!--------------------------------------------------------
! 02prg01.f95
! Aritmetik Operatörlerin kullanımı
!--------------------------------------------------------
IMPLICIT NONE
INTEGER :: x = 15, y = 3

  PRINT *,"x + y   = ", x + y
  PRINT *,"x - y   = ", x - y
  PRINT *,"x * y   = ", x * y
  PRINT *,"x / y   = ", x / y
  PRINT *,"x **y   = ", x ** y
  PRINT *
  PRINT *,"x+y/2   = ", x+y/2
  PRINT *,"(x+y)/2 = ", (x+y)/2

END PROGRAM