ac1230.pas

uralcode

program ural1230;
begin
  write('P=''"'';');
  write('Q="''";');
  write('A=''?"P="+Q+P+Q+";Q="+P+Q+P+";A="+Q+A+Q+";"+A'';');
  write('?"P="+Q+P+Q+";Q="+P+Q+P+";A="+Q+A+Q+";"+A');
end.