infoarena informatica de performanta

#include<fstream.h>
ifstream f("coins.in");
ofstream g("coins.out");
int main()
{
int a[100],n,ok,i,j,m,s=0,s1,x,k,p,y;
f>>n;
for (i=1;i<=n;i++)
	{
	s1=0;
		for (j=1;j<=22;j++)
			{
			f>>a[j];
			if (a[j]==1) s1++;
			}
		x=0;
		while (p!=s1)
		{
			for (k=1;k<=s1;k++)
			if (a[k]==0)
			{
			y=k;
			break;
			}
		for (k=22;k>=s1;k--)
		if (a[k]==1)
			{
			p=k;
			break;
			}
		a[y]=1;
		a[p]=0;
		x++;
		}
	if (x%2==0) s=s+s1;
	}
g<<s;
return 0;
}