Cod sursa(job #158025)

Utilizator ktalyn2007Popa Catalin ktalyn2007 Data 13 martie 2008 13:38:27
Problema Ecuatie Scor 0
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.68 kb
#include<stdio.h>
#include<math.h>
FILE *f1,*f2;
int main()
{int delta,x,x1,x2,a,b,c,k,v[100],p1,p2,q2,q1,d,j,aux,cn=0,sol[100];
f1=fopen("ecuatie.in","r");
f2=fopen("ecuatie.out","w");
fscanf(f1,"%i %i %i",a,b,c);
delta=b*b-4*a*c;
if(delta<0)
{fprintf(f2,"Nu are solutii in R"); }
else{x1=(-b+sqrt(delta))/(2*a);
		 x2=(-b-sqrt(delta))/(2*a);}
for(d=0;d<a;d++)
{if(a%d==0)
{v[d]=d;cn++;}}}
for(d=0;d<n;d++)
{if(v[d]<v[d+1])
{aux=v[d];
v[d]=v[d+1];
v[d+1]=aux}}
for(d=0;d<n;d++)
for(k=0;k<cn;k++)
p1=d;q1=-x1*d;
p2=a/d;q2=-x2*(a/d);
sol[k]=p1;sol[k+1]=q1;sol[k+2]=p2;sol[k+3]=q2;
for(k=0;k<c;k++)
{fprintf(f2,"%lu",&sol[k]);}

fclose(f1);
fclose(f2);
return 0;}