比赛 | NOIP2008集训模拟3 | 评测结果 | C |
---|---|---|---|
题目名称 | IP网络管理员 | 最终得分 | 0 |
用户昵称 | 0彼岸0 | 运行时间 | 0.000 s |
代码语言 | Pascal | 内存使用 | 0.00 MiB |
提交时间 | 2008-11-12 11:21:26 | ||
program networkip; var s1:string; begin assign(input,'networkip.in'); assign(output,'networkip.out'); reset(input); rewrite(output); readln(s1); len=length(s1); for i:=0 to len-2 do write(s1[i]); writeln(s[len-1]-1); write('255.255.255.248'); close(input); close(output); end.