2017.6.4测试 题二 睡眠

var s,t,ss:string; h,hh,m,mm,i,j:longint; begin readln(s);//睡醒~ ss:=copy(s,1,2);//将小时取出 val(ss,h);//转成数字 ss:=copy(s,4,5);//将分钟取出 val(ss,m); readln(t);//睡醒~ ss:=copy(t,1,2); val(ss,hh); ss:=

>>阅读原文<<