Hà Quang Tất Đạt

const
        fi = 'binary.inp';
        fo = 'binary.out';
var
        b : array [1..100000] of char;
        s0: string;
        j : char;
        n,res,l : longint;

procedure xuli();
var stam : string;
        i: longint;
        begin
                stam:= '';
                for i:=1 to n do
                stam := stam + b[i];
                if pos(s0,stam) > 0 then
                res := (res+1) mod l;
        end;

procedure thu(i:longint);
var j:char;
        begin
        for j := '0' to '1' do
                begin
                        b[i] := j;
                        if i = n then
                        xuli()
                        else
                        thu(i+1);
                end;
        end;

begin
        assign(input,fi);reset(input);
        assign(output,fo);rewrite(output);
        readln(n);
        readln(s0);
        res:=0;
        l := trunc(1e9)+7;
        thu(1);
        write(res);
close(input);close(output);
end.

#include <bits/stdc++.h>

using namespace std;
int fre[100000],c[10000];
int a[1000][1000];
int n,m,u,v;

void duyet(int i)
{
    fre[i] = false;
    for(int j=1; j<=n; j++)
        if ((fre[j] == true) && (a[i][j] == 1))
        duyet(j);
}

int main()
{
    freopen("DOTHI1.INP","r",stdin);
    freopen("DOTHI1.OUT","w",stdout);
    cin >> n >> m;
    int res = 0;
    for(int i=1; i<=n; i++)
    {
        cin >> u >> v;
        a[u][v] = 1;
        a[v][u] = 1;
    }
    for(int i=1; i<=n; i++)
        fre[i] = true;
    for(int i=1; i<=n; i++)
        if (fre[i])
    {
        duyet(i);
        res++;
    }
    cout << res;
    return 0;
}

#include <bits/stdc++.h>

using namespace std;
int fre[100000],c[10000],d[10000];
int a[1000][1000];
int n,m,u,v,k;

void duyet(int i)
{
    fre[i] = false;
    {
        k++;
        c[k] = i;
    }
    for(int j=1; j<=n; j++)
        if ((fre[j] == true) && (a[i][j] == 1))
        duyet(j);
}

int main()
{
    freopen("DOTHI2.INP","r",stdin);
    freopen("DOTHI2.OUT","w",stdout);
    cin >> n >> m;
    int res = 0;
    for(int i=1; i<=n; i++)
    {
        cin >> u >> v;
        a[u][v] = 1;
        a[v][u] = 1;
    }
    for(int i=1; i<=n; i++)
        fre[i] = true;
    for(int i=1; i<=n; i++)
        if (fre[i])
    {
        duyet(i);
        for(int i=1; i<=k; i++)
            cout << c[i] ;
        cout << endl;
        k = 0;
        //res++;
    }
    return 0;
}

const
        fi = 'strings2.inp';
        fo = 'strings2.out';
var
        s,s1,t,tam : ansistring;
        p,d,i,j: longint;
begin
        assign(input,fi);reset(input);
        assign(output,fo);rewrite(output);
        readln(s);
        readln(t);
        d:=0;
        p:=length(t);
        for i:=1 to length(s)-p+1 do
        for j:=p+i-1 to length(s) do
          begin
          tam := copy(s,i,j-i+1);
          if pos(t,tam) > 0 then inc(d);
          end;
        write(d);
close(input);close(output);
end.

const
        fi = 'luckyticket.inp';
        fo = 'luckyticket.out';
var
        s,s1 : ansistring;
        i: longint;
function tang(u : string) : string;
var nho,tam,p,i,j : longint;
begin
        nho :=0;
        p:=0;
        for i:=length(u) downto 1 do
        begin
                val(u[i],tam);
                if i=length(u) then
                        tam:= tam + 1 ;
                p := (nho+tam) mod 10;
                nho := (tam+nho) div 10;
                u[i] := chr(p+48);
        end;
        if nho > 0 then
        u := '1' + u;
        exit(u);
end;

function kt(u: string) : boolean;
var t,p1,p2,tam : longint;
begin
    t:=0;
    p2:=0;
    p1:=0;
    for i:=1 to length(u) do
        if i mod 2 = 0 then
        begin
                val(u[i],tam);
                inc(p1,tam);
        end
        else
        begin
                val(u[i],tam);
                inc(p2,tam);
        end;
    if (p1 = p2) then exit(true)
    else exit(true);
end;


begin
        assign(input,fi);reset(input);
        assign(output,fo);rewrite(output);
        readln(s);
        s1 := tang(s);
        while kt(s1) = false do
              s1:= tang(s1);
        write(s1);
close(input);close(output);
end.

const
        fi = 'cppr.inp';
        fo = 'cppr.out';
var
        n,i,res : longint;
        f : array[-1..100000] of boolean;
function pali(u:longint) : boolean;
var su : string;
begin
        str(u,su);
        for i:=1 to length(su) div 2 do
                if su[i] <> su[length(su)-i+1] then
                exit(false);
        exit(true);
end;

procedure snt( u :longint) ;
var     i,j:longint;
begin
        fillchar(f,sizeof(f),true);
        f[1]:=false;
        i:=2;
        while i<=trunc(sqrt(u)) do
                begin
                        while f[i]=false do
                                inc(i);
                        for j:=2 to u div i do
                                f[i*j]:=false;
                        inc(i);
                end;
end;


procedure xuli();
var i:longint;
begin
        res:=0;
        snt(n);
        for i:=1 to n do
        if (pali(i) = false) and (f[i]) then
                res := res+1;
        write(res);
end;

begin
        assign(input,fi);reset(input);
        assign(output,fo);rewrite(output);
        readln(n);
        xuli();
close(input);close(output);
end.

#include <bits/stdc++.h>

using namespace std;
int n,r,res=-1e9;
int a[1000007];
int c[1000007];
int b[1000007];


void xuli()
{
    int sa=0;
    int sc=0;
    for (int i=1; i<=n; i++)
    if (b[i]==1)
    {
        sa=sa+a[i];
        sc=sc+c[i];
        if (sc > r) return;
    }

        res=max(res,sa);
}

void sinh(int i)
{
    for(int j=0; j<=1; j++)
    {
        b[i] = j;
        if (i==n) xuli();
        else sinh(i+1);
    }
}

int main()
{
    freopen("DRSEL.INP","r",stdin);
    freopen("DRSEL.OUT","w",stdout);
    cin >> n >> r;
    for(int i=1; i<=n; i++)
        cin >> a[i] >> c[i];
    sinh(1);
    cout <<res;
    return 0;
}