Problem:
Score : 100 points

Problem Statement

An uppercase or lowercase English letter \alpha will be given as input.
If \alpha is uppercase, print A; if it is lowercase, print a.

Constraints

\alpha is an uppercase (A - Z) or lowercase (a - z) English letter.

Input

Input is given from Standard Input in the following format:

α

Output

If \alpha is uppercase, print A; if it is lowercase, print a.

Sample Input 1

B

Sample Output 1

A

B is uppercase, so we should print A.

Sample Input 2

a

Sample Output 2

a

a is lowercase, so we should print a.

Solution in Fortran (GNU Fortran 9.2.1) (judge verdict: Accepted)

program moji
character(1)::a
k=0
read*,a
 if(a=='A')then
 print*,'A'
 k=1
 end if
  if(a=='B')then
 print*,'A'
  k=1
 end if
  if(a=='C')then
 print*,'A'
  k=1
 end if
  if(a=='D')then
 print*,'A'
  k=1
 end if
  if(a=='E')then
 print*,'A'
  k=1
 end if
  if(a=='F')then
 print*,'A'
  k=1
 end if
  if(a=='G')then
 print*,'A'
  k=1
 end if
  if(a=='H')then
 print*,'A'
  k=1
 end if
  if(a=='I')then
 print*,'A'
  k=1
 end if
  if(a=='J')then
 print*,'A'
  k=1
 end if
  if(a=='K')then
 print*,'A'
  k=1
 end if
  if(a=='L')then
 print*,'A'
  k=1
 end if
 if(a=='M')then
 print*,'A'
  k=1
 end if
  if(a=='N')then
 print*,'A'
  k=1
 end if
  if(a=='O')then
 print*,'A'
  k=1
 end if
  if(a=='P')then
 print*,'A'
  k=1
 end if
  if(a=='Q')then
 print*,'A'
  k=1
 end if
   if(a=='R')then
 print*,'A'
  k=1
 end if
   if(a=='S')then
 print*,'A'
  k=1
 end if
   if(a=='T')then
 print*,'A'
  k=1
 end if
   if(a=='U')then
 print*,'A'
  k=1
 end if
    if(a=='V')then
 print*,'A'
  k=1
 end if
    if(a=='W')then
 print*,'A'
  k=1
 end if
    if(a=='X')then
 print*,'A'
  k=1
 end if
    if(a=='Y')then
 print*,'A'
  k=1
 end if
    if(a=='Z')then
 print*,'A'
  k=1
 end if
 
 IF(K==0)THEN
 PRINT*,'a'
 end if
end program moji