var a,b,c,d,e,f:longint;
begin
read(a);
b:=a mod 10;
c:=a div 10 mod 10;
d:=a div 100 mod 10;
e:=a div 1000 mod 10;
f:=a div 10000;
if (c<>5)and(b<>5)and(d<>5)and(e<>5)and(f<>5) then write(a)
else write(b+c+d+e+f);
end.
/**************************************************************
	Problem: 1659
	User: admin
	Language: Pascal
	Result: Wrong Answer
****************************************************************/