fp=fopen("d1.dat","w"); 

for(i=0;i<3;i++)  fprintf(fp,"%d",a[i]); 

fprintf(fp,"\n"); 

fclose(fp); 

fp=fopen(