Cod sursa(job #37554)

Utilizator robbyRobertino robert robby Data 25 martie 2007 10:55:41
Problema Bowling Scor 0
Compilator c Status done
Runda preONI 2007, Runda 4, Clasa a 10-a Marime 0.67 kb
#include <stdio.h>
#define nmax 50001
long a[nmax],b[12][nmax],nr;

FILE *f,*g;
int main()
{
  long n,i,j,t,ok,cas;
  f=fopen("bowling.in","rt");
  g=fopen("bowling.out","wt");
  fscanf(f,"%ld\n",&t);
  for (i=1;i<=t;i++)
	{
	  nr=0;
	  fscanf(f,"%ld",&n);
	  ok=1;
	  for (j=1;j<=n;j++)
		{
		  fscanf(f,"%ld",&a[j]);
		  if (a[j]==1&&ok)
			{
			  nr++;
			  ok=0;
			}
		   else
		  if (a[j]==0)
			ok=1;
		  if (!ok)
			b[i][nr]++;
		}
	  cas=-1;
	  for (j=1;j<=nr;j++)
		if ((b[i][j]%3==0)||(b[i][j]==1))
		  cas++;


	  if (cas==0)
		fprintf(g,"Nargy\n");
	   else
		fprintf(g,"Fumeanu\n");
	}

  fclose(f);
  fclose(g);
  return 0;
}