do i=0 to 6 say date(W,i,B)" " end