CODE[VS] 1670 无穷的序列二分答案水法

最新推荐文章于 2023-07-16 20:39:14 发布

Lost_Deviation

最新推荐文章于 2023-07-16 20:39:14 发布

阅读量794

点赞数

分类专栏：二分答案代码箱文章标签： pascal 二分答案

本文链接：https://blog.csdn.net/Lost_Deviation/article/details/51815470

版权

【问题描述】
有一个无穷序列如下：110100100010000100000…
请你找出这个无穷序列中指定位置上的数字
【输入】
第一行一个正整数N，表示询问次数；
接下来的N行每行一个正整数Ai，Ai表示在序列中的位置。
【输出】
N行，每行为0或1，表示序列第Ai位上的数字。
【输入样例】
4
3
14
7
6
【输出样例】
0
0
1
0
【数据范围】
对于100%的数据有N≤1500000，Ai≤10^9

虽然说是数论题但是二分答案法也可以做，记录每一个1所在的地址然后二分答案就好，44721^2=2*10^9。

`var a:array[0..44721]of longint;
n,i,ask,y,z,mid,db:longint;
p:boolean;
begin
for i:=1 to 44721 do a[i]:=i+a[i-1];
read(n);
for i:=1 to n do begin
read(ask);

    y:=1;
    z:=44721;
    p:=true;
    if ask=1 then writeln(1) else
    if ask=2 then writeln(1) else
    while p do begin
        mid:=(y+z) div 2;
        if ask<a[mid] then z:=mid
        else if (ask>a[mid]+1) and (as