Cod sursa(job #6963)

Utilizator free2_do_rhymesGet a Life free2_do_rhymes Data 21 ianuarie 2007 11:10:17
Problema Elimin Scor 10
Compilator cpp Status done
Runda preONI 2007, Runda 1, Clasa a 10-a Marime 0.72 kb
#include <fstream.h>
int a[1000][1000],n,m,i,j,l,c,sl[1000],sc[1000],min,k,st=0;
int main()
{
	ifstream f("elimin.in");
	ofstream g("elimin.out");
	f>>n>>m>>l>>c;
	for(i=1;i<=n;i++)
		for(j=1;j<=m;j++)
		{
			f>>a[i][j];
			sl[i]=sl[i]+a[i][j];
			st=st+a[i][j];
		}
	min=32001;
	while(l)
	{
		for(i=1;i<=n;i++)
			if(sl[i]<min)
			{
				min=sl[i];
				k=i;
			}
		for(i=1;i<=m;i++)
			a[k][i]=0;
		st=st-sl[k];
	      	sl[k]=0;
		l--;
		min=32001;
	}
	for(i=1;i<=n;i++)
		for(j=1;j<=m;j++)
			sc[j]=sc[j]+a[i][j];
	min=32001;
	while(c)
	{
		for(i=1;i<=m;i++)
			if(sc[i]<min)
			{
				min=sc[i];
				k=i;
			}
		st=st-sc[k];
		sc[k]=0;
		c--;
		min=32001;
	}
	g<<st<<" ";
	return 0;
}