program fjf436g;

const
  k = Succ ('J');

function c: CString;
begin
  Return Pred ('P')
end;

function d: CString;
begin
  d := k
end;

begin
  WriteLn (CString2String (c), CString2String (d))
end.
