Cod sursa(job #2714526)

Utilizator rusepetruRuse Petru rusepetru Data 1 martie 2021 22:01:51
Problema Perle Scor 100
Compilator cpp-64 Status done
Runda Arhiva de probleme Marime 0.62 kb
#include <fstream>
using namespace std;
ifstream fin("perle.in");
ofstream fout("perle.out");
int a[10001],i,k,j,x,n;
int perlab(int k);
int perlac(int k);
int perlab(int k)
{
    if(a[k]==1&&a[k+2]==3)return perlac(k+4);
    if(a[k]==2)return perlab(k+1);
    return 0;
}

int perlac(int k)
{
    if(a[k]==1&&a[k+1]==2)return k+2;
    if(a[k]==2)return k;
    if(a[k]==3)return perlac(perlab(k+1)+1);
    return 0;
}
int main()
{
fin>>n;
for(i=1;i<=n;i++)
{
fin>>x;
for(j=1;j<=x;j++)
    fin>>a[j];
    if(x==1||perlab(1)==x||perlac(1)==x)fout<<1<<'\n';
    else fout<<0<<'\n';

}
    return 0;
}