var t:string;
i:integer;
t1,t2:text;
begin
assign(t1,'text.dat');
assign(t2,'text.sol');
reset(t1);
readln(t1,t);
for i:=1 to length(t) do
begin
case t[i]of
'q':t[i]:='Q';
'w':t[i]:='W';
'e':t[i]:='E';
'r':t[i]:='R';
't':t[i]:='T';
'y':t[i]:='Y';
'u':t[i]:='U';
'i':t[i]:='I';
'o':t[i]:='O';
'p':t[i]:='P';
'a':t[i]:='A';
's':t[i]:='S';
'd':t[i]:='D';
'f':t[i]:='F';
'g':t[i]:='G';
'h':t[i]:='H';
'j':t[i]:='J';
'k':t[i]:='K';
'l':t[i]:='L';
'z':t[i]:='Z';
'x':t[i]:='X';
'c':t[i]:='C';
'v':t[i]:='V';
'b':t[i]:='B';
'n':t[i]:='N';
'm':t[i]:='M';
'Q':t[i]:='q';
'W':t[i]:='w';
'E':t[i]:='e';
'R':t[i]:='r';
'T':t[i]:='t';
'Y':t[i]:='y';
'U':t[i]:='u';
'I':t[i]:='i';
'O':t[i]:='o';
'P':t[i]:='p';
'A':t[i]:='a';
'S':t[i]:='s';
'D':t[i]:='d';
'F':t[i]:='f';
'G':t[i]:='g';
'H':t[i]:='h';
'J':t[i]:='j';
'K':t[i]:='k';
'L':t[i]:='l';
'Z':t[i]:='z';
'X':t[i]:='x';
'C':t[i]:='c';
'V':t[i]:='v';
'B':t[i]:='b';
'N':t[i]:='n';
'M':t[i]:='m';
end;
end;
rewrite(t2);
writeln(t2,t);
close(t1);
close(t2);
end.