Contratación urgente de expertos en programación en C
//Compílelo con Borland C v 3.1
//Por KaKucartoon
# include lt;iostream.hgt;
int cuadrado(int, int);
main()
{
int a, i, l, n;
coutlt;lt; "Char..Pol";
cingt;gt;a;
l=cuadrado(2,a)-1;
n=a;
coutlt;lt;" CHARTERLASTIC POLIM|NOMIAL ( "lt;lt;alt;lt;", ";".
int b[1001];
int v[1001];
int c=0
v[a]=1
hacer
{
coutlt;lt; "INPUT CHAR POL";
cingt;gt;.gt;a;
if (agt; 0 )
{
v[a]=1
coutlt;lt;alt;lt;",";
}
}
mientras (agt; 0);
coutlt; "0)" lt;
para (i=1; ilt; =n; i ) b[i]=1
para (int m=1; mlt; =l; m )
{
c=0;
para (i=1; ilt; =n; i )
{
si ( v[i]*b[i]==1)
{
c=1-c
}
}
b[0]=c;
coutlt;lt;c;
for (i=n;igt;=1;i--)
b[i]=b[i-1];
}
}
int cuadrado(int i, int j)
{
int t=1;
for (int p=1; plt; =j; p ) t*=i;
return t;
}
Ah, por cierto, tu imagen es gwbasic, ¿verdad?
Parece viejo