Fp=fopen(“d2.dat”,”w”);

For(i=0;i<6;i++) fprintf(fp,”%d\n”,a[i]);

Fclose(fp);

Fp=fopen(“d2.dat”,”r”);

For(i=0;i<3;i++)  fsc