program ex0304
 integer :: A
 real :: B
 complex :: C
 character (len = 40) :: D
 logical :: E
 write (*,*) 'Please input a (integer) number:'
 read (*,*) A
 write (*,*) 'Please input a (real) number:'
 read (*,*) B
 write (*,*) A, B
 stop
 end program ex0304