program Project2;

{$APPTYPE CONSOLE}

uses
  SysUtils;

var a,m:string;
    n,g,k,i:integer;
begin
readln(a);
n:=length(a);
g:=0;
k:=0;


for i:=1 to n do
 if (a[i]>='a') and (a[i]<='z')then inc(g);
 if (a[i]>='A') and (a[i]<='Z') then inc(k);



  { TODO -oUser -cConsole Main : Insert code here }
end.