PROGRAM Tip_Donusumleri
!---------------------------------------------------
! 02prg02.f95
! Tip dönüşümleri 
!---------------------------------------------------
IMPLICIT NONE
REAL :: A, B, C
INTEGER :: I, J, K

 A = 3.
 B = 4.
 I = 5
 J = 3
 C = A + I / J
 K = A / I + 2 * B / J

 PRINT *, C, K

END PROGRAM