ac1072.pas

来自「同济大学 Online在线题库 AC源代码合集 程序设计竞赛必看资料」· PAS 代码 · 共 2 行

var a:string;begin a:='var a:string;begin a:=;writeln(copy(a,1,22),chr(39),a,chr(39),copy(a,23,59));end.';writeln(copy(a,1,22),chr(39),a,chr(39),copy(a,23,59));end.