program df;

var m,s,t,m1,t1,s1,k,i:integer;

begin

read(m,s,t);

t1:=m div 10;

s1:=t1*60;

m1:=m mod 10;

while (s1=120) and (m1