program lettura
implicit none
integer:: i,n
real:: x,y

read(5,*)n
do i=1,n 
   read(5,*) x,y
   write(6,'(2f8.2)')x,y
enddo
end program lettura