var z:char; begin readln(z); if z='A' then writeln('Y') else writeln('N');end.
G
N
The brand new service which powers Ideone!
Widget for compiling and running the source code in a web browser!