program ideone;
var
  A: Integer;
  B: String;
begin
  ReadLn(A, B);
  Write('A: ', A, ', B: ', B);
end.