real,allocatable:: a(:)
	
	open(10,file="test_4.in")
	read (10,*)n
	allocate(a(n))
	read(10,*)a
	
	amax=-1.e32
	amin= 1.e32
	
	do i=1,n
	
	if(a(i).gt.amax)then
	amax=a(i)
	endif
	
	if(a(i).lt.amax)then
	amin=a(i)
	endif
	
	enddo
	print *,amin,amax
	
	stop
	end