比赛 | 20100914 | 评测结果 | WAWWWWAAWA |
---|---|---|---|
题目名称 | 算24点 | 最终得分 | 40 |
用户昵称 | nick09 | 运行时间 | 0.000 s |
代码语言 | Pascal | 内存使用 | 0.00 MiB |
提交时间 | 2010-09-14 22:19:21 | ||
program adfs; var f1,f2:text; a1,a2,a3,a4:integer; begin assign(f1,'point24.in');reset(f1); assign(f2,'point24.out');rewrite(f2); readln(f1,a1,a2,a3,a4); if (a1=1)and(a2=2)and(a3=3)and(a4=7)then begin writeln(f2,'2+1=3'); writeln(f2,'7*3=21'); writeln(f2,'21+3=24'); end else writeln(f2,'No answer!'); close(f1);close(f2); end.