模拟试——sleep

题目大意：

题解：
这题直接模拟：
a为醒来时间小时 b为分钟
c为睡觉时间小时 d为分钟
e表示间隔小时 f表示分钟
如果目前b < d这时候很明显不满一个小时，
a=a-1,f=b+(20-d)
否则直接f=b-d
判断完分钟以后，如果a>c就代表在同一天，
e=a-c
否则就是隔了一天，
e=a+(24-c)
最后输出【e:f】

var      s1,s2,t1,t2:string;      s,t:string;      a,b,c,d,e,f:longint;begin      assign(input,'sleep.in'); reset(input);      assign(output,'sleep.out'); rewrite(output);      readln(s);      s1:=s[1]+s[2]; s2:=s[4]+s[5];      val(s1,a); val(s2,b);      readln(t);      t1:=t[1]+t[2]; t2:=t[4]+t[5];      val(t1,c); val(t2,d);      if b>d  then f:=b-d              else begin a:=a-1; f:=b+(60-d); end;      if a>=c then e:=a-c              else e:=a+(24-c);      e:=e+f div 60;      f:=f mod 60;      if e div 10=0         then write('0');      write(e,':');      if f div 10=0         then write('0');      write(f);      close(input); close(output);end.