| 比赛 | 20121106 | 评测结果 | WAWWWWWW |
|---|---|---|---|
| 题目名称 | 过河 | 最终得分 | 12 |
| 用户昵称 | Lyre | 运行时间 | 0.003 s |
| 代码语言 | Pascal | 内存使用 | 0.17 MiB |
| 提交时间 | 2012-11-06 11:34:02 | ||
var m:longint;
begin
assign(input,'rivera.in');
assign(output,'rivera.out');
reset(input);
rewrite(output);
readln(m);
if m<20 then writeln('NO') else
writeln((m div 2)-1);
close(input);
close(output);
end.