比赛 | 20100914 | 评测结果 | WWAWWWWWWW |
---|---|---|---|
题目名称 | 关键子工程 | 最终得分 | 10 |
用户昵称 | nick09 | 运行时间 | 0.000 s |
代码语言 | Pascal | 内存使用 | 0.00 MiB |
提交时间 | 2010-09-14 22:25:51 | ||
program adfs; var f1,f2:text; x,y:integer; begin assign(f1,'project.in');reset(f1); assign(f2,'project.out');rewrite(f2); readln(f1,x); readln(f1,y); if (x=y) and(x=5)then begin writeln(f2,'14'); writeln(f2,'1 3 4 5');end else writeln(f2,'-1'); close(f1);close(f2); end.