Cod sursa(job #2457340)

Utilizator driver71528@gmail.comTerec Andrei-Sorin [email protected] Data 17 septembrie 2019 13:49:27
Problema Perle Scor 10
Compilator cpp-64 Status done
Runda Arhiva de probleme Marime 0.99 kb
#include <iostream>
#include <fstream>
#define MaxL 10001
using namespace std;

ifstream f("perle.in");
ofstream g("perle.out");
int l,i,n;
short x[MaxL];

bool perlaB();
bool perlaC()
{
    if(i==l)
        return x[i]==2;
    if(l==i+2)
        return x[i]==1 && x[i+1]==2;
    if(x[i]==3)
    {
        i++;
        if(perlaB())
            return perlaC();
        else
            return false;
    }
    else return false;
}
bool perlaB()
{
    while(x[i]==2)
        i++;
    if(i+4<=l)
    {
        int j=i;
        i+=4;
        return x[j]==1 && x[j+2]==3 && perlaC();
    }
    else
        return false;
}
bool solve()
{
    i=1;
    if(l==1)
        return true;
    if(x[1]==3)
        return perlaC();
    else
        return perlaB();
}

int main()
{
    f>>n;
    for(int i=1;i<=n;i++)
    {
        f>>l;
        for(int i=1;i<=l;i++)
            f>>x[i];
        g<<solve()<<'\n';
    }
    f.close();
    g.close();
    return 0;
}