Primos sexy

Alba Pardo

/* Una pareja de primos sexy es aquella cuya diferencia es 6. Este programita apareció en el examen de febrero del año pasado.*/

# include <stdio.h>
# include <math.h>

int main ()
{
int i=0,a,b,c;

FILE *pf;

pf=fopen(“Primos_sexy.txt”,”w”);
for (i=0;i<200;i++)
{
a=primo(i);
b=primo(i+6);
if (a==1&&b==1)
{
printf(“(%d, %d)\t”,i,i+6);
fprintf(pf,”(%d,%d)\t”,i,i+6);
}
}

fclose(pf);
system(“PAUSE”);
return 0;
}

int primo (int a)
{
int i;
double x;

if(a%2==0)
{
if(a==2) return 1;
else return 0;
}
else
{
x = sqrt(a);
i = 3;
while ((i <=x)&&(a % i != 0))
{
i = i + 2;
}
if (i > x) return 1;
else return 0;
}
}

Esta entrada fue publicada en Informática e Internet. Guarda el enlace permanente.

Deja un comentario

Introduce tus datos o haz clic en un icono para iniciar sesión:

Logo de WordPress.com

Estás comentando usando tu cuenta de WordPress.com. Cerrar sesión / Cambiar )

Imagen de Twitter

Estás comentando usando tu cuenta de Twitter. Cerrar sesión / Cambiar )

Foto de Facebook

Estás comentando usando tu cuenta de Facebook. Cerrar sesión / Cambiar )

Google+ photo

Estás comentando usando tu cuenta de Google+. Cerrar sesión / Cambiar )

Conectando a %s