program main implicit none integer::P,i,total integer::NK(2,100) data total/0/ read *,P read *,NK(:,1:P) do i=1,P if(MOD(NK(1,i),(NK(2,i)+1)).ne.1) then print '(a)',"Win" else print '(a)',"Lose" end if end do end program main