program calc write(*,*) 5/2 write(*,*) 5.0/2 end