program chislo;
var a, b, c, k: integer;
begin
writeln ('a='); readln(a);
writeln('b='); readln(b);
writeln('c='); readln(c);
k:=0;
 if a=0 then k:=k+1;
 if b=0 then k:=k+2;
 if  c=0 then k:=k+3;
 writeln('k=',k);

 end.