背景 Background怪盗基德 VS OIBH系列
第一话 |
描述 Description怪盗基德煞费苦心历尽九九八十一难终于来到了存放Paris Sunshine的OIBH总部
大楼顶上。基德知道这幢大楼的层数以及哪几层有呆头呆脑的警察。他还知道 Paris Sunshine就藏在两层层数与警卫人数成反比的楼层的中间那层。基德想 要知道那层楼的层数，警卫人数以及到那层所要经过的警卫人数。基德行踪不 定，可能从楼底往楼上走，也可能从楼顶往楼下走。 |
输入格式 InputFormat输入文件共n+1行。第一行为2个数a,b。分别表示大楼的层数以及怪盗基德会从楼
下还是楼上出发。b=1则表示从楼顶出发，b=0表示从楼底出发。第2行到第n+1行 每行一个整数。表示该层警卫人数。 |
输出格式 OutputFormat输出文件共1行，为两个用空格隔开的整数，分别是Paris Sunshine的藏匿地点以
及基德盗走Paris Sunshine所要经过楼层的警卫总数。 |
样例输入 SampleInput [复制数据]5 136145
|
样例输出 SampleOutput [复制数据]2 16
|
数据范围和注释 Hint输入数据保证只有唯一一层楼符合条件。
|
时间限制 TimeLimitation基德可不能等到警卫来抓他，所以你必须在1S内找出正确答案。
|
来源 SourceFrom 玛维-影之歌
|
附代码： program p1400; var a,b,i,j,k,s:integer; g:array[0..99999]of longint; begin readln(a,b); for i:=1 to a do readln(g[i]); for i:=1 to a-1 do for j:=i+1 to a do if g[i]*i=g[j]*j then k:=(i+j)div 2; s:=0; if b=1 then for i:=a downto k do s:=s+g[i] else for i:=1 to k do s:=s+g[i]; write(k,‘ ‘,s); readln; readln; end.
原文：http://www.cnblogs.com/111qqz/p/4296132.html