Cod sursa(job #934485)

Utilizator paulhelmerPaul Helmer paulhelmer Data 30 martie 2013 18:39:04
Problema Perle Scor 100
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.68 kb
#include <fstream>
using namespace std;

int a[10005], n, i, j;
int perlac(int x);
int perlab (int x)
{
    if (a[x]==1 && a[x+2]==3) return perlac(x+4);
    else if (a[x]==2) return perlab(x + 1);
    return 0;
}
int perlac (int x)
{
    if (a[x]==1 && a[x+1]==2) return x+3;
    else if (a[x]==2) return x+1;
    else if (a[x]==3) return perlac(perlab(x+1));
    return 0;
}

int main()
{
    ifstream f("perle.in");
    ofstream g("perle.out");
    f>>n;
    for (i=1;i<=n;i++)
    {
        f>>a[0];
        for (j=1;j<=a[0];j++) f>>a[j];
        if (a[0]==1 || perlab(1)==a[0]+1 || perlac(1)==a[0]+1) g<<1<<'\n';
        else g<<0<<'\n';
    }
    return 0;
}