| 比赛 | 20111110 | 评测结果 | AWWWWWWWWW |
|---|---|---|---|
| 题目名称 | 整理牙刷 | 最终得分 | 10 |
| 用户昵称 | Launcher | 运行时间 | 0.000 s |
| 代码语言 | Pascal | 内存使用 | 0.00 MiB |
| 提交时间 | 2011-11-10 11:21:45 | ||
program put;
var
a:array[1..1000]of integer;
i,j,k,m,n,max:longint;
begin
assign(input,'put.in');reset(input);assign(output,'put.out');rewrite(output);
read(n);
if n=1 then begin writeln('No Solution!'); exit; end;
if n=2 then writeln(1);
if n=3 then writeln(2);
if n=4 then writeln(12);
if n>4 then writeln(n*n+1);
close(input);close(output);
end.