(a) write(*,*)'Hello World!'
(b) read(*,*)i,j,k
(c) read(16,*)i
    read(16,*)j
    read(16,*)k
(d) word4=word(1:4)
(e) irem=mod(i,2)
    irem = i - (i/2)*2


