integer,parameter::g=0,c=1,p=2 read *,N,K if(N.eq.K) then print '(a)',"Drew" else if((N.eq.g.and.K.eq.c).or. & (N.eq.c.and.K.eq.p).or. & (N.eq.p.and.K.eq.g)) then print '(a)',"Won" else print '(a)',"Lost" end if end