program ex0305
 integer :: A,B,C
 read (*,*) A, B, C
 write (*,*) A, B, C
 stop
 end program ex0305