【国庆长假】（2＋2＋2＋2＋2＝10分）
味子有8天的国庆长假。8天长假听起来很美，可是味子却颇感头痛。因为在这个长假里，味子既想完成老师布置的total项作业（每项作业都需要1个小时来完成），又想在假期里好好玩玩。
味子也不知道这两个事情是否能两全其美，于是她编写了一个程序来进行判断。如果程序输出“Yes”，说明味子既可以享受自己设想的所有玩耍活动，又可以完成老师布置的所有作业。如果程序输出“No”，说明如果想享受全部玩耍，味子必定不能完成所有作业。在后者这种情形下，作为好学生的味子必定会砍掉一些玩耍而保证作业的完成。
下列程序中的数组a用来保存8天中所有时刻的情况，a[I,j]表示第i天时刻j开始的1小时是否安排了玩耍，1表示有安排，0表示没有安排玩耍。按照味子的生活规律，每天从早上8点到17点之间的9个小时可以用来安排玩耍或做作业。
程序首先读入的一行包含两个整数n和total，表示味子设想的玩耍活动会在n天中有安排，total表示味子所有作业的数量。接下来是n行，每行第一个整数表示当天是长假的第几天，后面是若干对整数st和de，分别表示当天从时刻st（都为整点时刻）开始有一项玩耍，该玩耍会持续de小时，也就是说，在st到st+de的这段时间内，味子是不能做任何作业的。每行最后是一对用空格分隔的0，表示该行数据输入的结束。这两个零的作用仅仅用来表示该行输入数据的结束，没有其他含义。
程序输出只有一行。如果在享受n天内设想的所有玩耍的前提下，味子还能完成所有作业，则输出“Yes”，否则输出“No”。
请你帮助味子完成下面的程序。
输入样例： 输入样例数据说明
4 5 //共有4天安排了玩耍，共有5项作业
1 8 2 12 2 16 1 0 0
4 8 8 0 0
7 8 5 13 1 0 0 //长假第7天设想了2项玩耍。第1项从8点开始持续5小时
8 8 1 9 1 11 3 14 1 0 0
输出样例：
Yes

program test_0905;
var
 i,j,i1,j1,st,de,n,total:integer;
 a:array[1..8,8..17] of integer;
begin
 for i:=1 to 8 do
  for j:=8 to 17 do
   a[i,j]:=0;
 readln(n,  total  );
 for i:=1 to n do
 begin
  read(i1);read(st,de);
  repeat
   for j1:=st to st+de do a[i1,j1]:=   1  ;
   read(st,de);
  until ((st=0) and (de=0));
 end;
 for i:=1 to 8 do
   for j:=8 to 17 do
    if a[i,j]=0 then total:=total-1;
 if    total<=0   then write(' Yes ') else write(' No ');
 end.