Program z9_03;
uses crt;
var i:char; j:integer;
BEGIN
clrscr;
read(i);
j:=0;
While i<>'.' do begin
inc(j);
read(i); end;
Writeln(j);
END.