Cod sursa(job #380359)

Utilizator GotenAmza Catalin Goten Data 5 ianuarie 2010 20:59:40
Problema Fractii Scor 0
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.31 kb
Raporteaza aceasta sursa 
#include<fstream.h>
#include<iostream.h>

int a[65100],n,i,j,nr;

int main()
{
	ifstream f("triti.in");
	ofstream g("triti.out");
	n=65000;
	for(i=1;i<=32500;i++)
		a[i<<1]=1;
	for(i=1;i<=n-2;i++)
		if(a[i])
			for(j=1;j<=(n-i)/2;j++)
				if(a[i+j]&&a[i+2*j])
					nr++;
	cout<<nr;
	return 0;
}