Паскаль. Написать программу электронных часов. Вводятся минуты и секунды, и часы начиная отсчет с них, начинают работать. То есть должен быть такой вид 23:44 И как дойдёт до 59, начинается по новой

Спасибо огромное

// PascalABC.NET 3.2, сборка 1338 от 16.11.2016uses GraphABC;begin  var s:=ReadlnString('Укажите время MM:CC');  var m:=s.Left(2).ToInteger;  var c:=s.Right(2).ToInteger;  var i:=m;  var j:=c;  Font.Size:=60;  Font.Color:=clBlue;  repeat    while i<60 do begin      while j<60 do begin        if i<10 then s:='0'+i+':' else s:=i+':';        if j<10 then s+='0'+j else s+=j;        FillRect(50,100,350,400);        DrawTextCentered(50,100,350,400,s);        Inc(j);        Sleep(1000)        end;      j:=0;      Writeln;      Inc(i)      end;    i:=0  until Falseend.