回 帖 发 新 帖 刷新版面

主题:tju1072

我毫无头绪,帮帮我~~~~~~~~~~~
+50

回复列表 (共2个回复)

沙发

麻烦给个程序来看看!

板凳

摘自:大榕树论坛

const s1:string='const s';const s2:string=':string=';const s3:string='begin writeln(s1,chr(49),s2,chr(39),s1,chr(39),chr(59),s1,chr(50),s2,chr(39),s2,chr(39),chr(59),s1,chr(51),s2,chr(39),s3,chr(39),chr(59),chr(13),chr(10),s3);end.';
begin writeln(s1,chr(49),s2,chr(39),s1,chr(39),chr(59),s1,chr(50),s2,chr(39),s2,chr(39),chr(59),s1,chr(51),s2,chr(39),s3,chr(39),chr(59),chr(13),chr(10),s3);end.

我来回复

您尚未登录,请登录后再回复。点此登录或注册