2047.c

北大POJ_ACM_2047素数检测.好不容易收集到的。

   p=h;
   while(strcmp(p->no,s)&&p!=NULL)  /*当记录的学号不是要找的，或指针不为空时*/
   p=p->next;
   if(p==NULL)
      printf("\nlist no %s student\n",s);
   else
   {
      printf("\n\n*****************************havefound***************************\n");
      printf("|nO        |      name     | sc1| sc2| sc3|   sum  |  ave  |order|\n");
      printf("|----------|---------------|----|----|----|--------|-------|-----|\n");
      printf("|%-10s|%-15s|%4d|%4d|%4d| %4.2f | %4.2f | %3d |\n", p->no,
p->name,p->score[0],p->score[1],p->score[2],p->sum,p->average,p->order);
      printf("********************************end*******************************\n");
   }
}

/*插入记录*/
STUDENT  *insert(STUDENT *h)
{
   STUDENT *p,*q,*info; /*p指向插入位置，q是其前驱，info指新插入记录*/
   char s[11];  /*保存插入点位置的学号*/
   int s1,i;
   clrscr();
   printf("please enter location  after the no\n");
   scanf("%s",s);   /*输入插入点学号*/
   printf("\nplease input the new record\n");
   info=(STUDENT *)malloc(sizeof(STUDENT));
   if(!info)
   {
      printf("\nout of memory");   /*如没有申请到，内存溢出*/
      return NULL;
   }
   inputs("enter no:",info->no,11);
   inputs("enter name:",info->name,15);
   printf("please input %d score \n",N);
   s1=0;    /*保存新记录的总分，初值为0*/
   for(i=0;i<N;i++)
   {
      do{        /*对数据进行验证，保证在0~100之间*/
     printf("score%d:",i+1);
     scanf("%d",&info->score[i]);
     if(info->score[i]>100||info->score[i]<0)
        printf("bad data,repeat input\n");
      }while(info->score[i]>100||info->score[i]<0);
      s1=s1+info->score[i];
   }
   info->sum=s1;
   info->average=(float)s1/N;
   info->order=0;         /*名次赋值0*/
   info->next=NULL;     /*设后继指针为空*/
   p=h;
   q=h;
   while(strcmp(p->no,s)&&p!=NULL)    /*查找插入位置*/
   {
      q=p;                 /*保存指针p，作为下一个p的前驱*/
      p=p->next;          /*将指针p后移*/
   }
   if(p==NULL)      /*如果p指针为空，说明没有指定结点*/
      if(p==h)      /*同时p等于h，说明链表为空*/
     h=info;   /*新记录则为头结点*/
      else
     q->next=info;  /*p为空，但p不等于h，将新结点插在表尾*/
   else
      if(p==h)     /*p不为空，则找到了指定结点*/
      {
     info->next=p; /*如果p等于h，则新结点插入在第一个结点之前*/
     h=info;    /*新结点为新的头结点*/
      }
      else
      {
     info->next=p;   /*不是头结点，则是中间某个位置，新结点的后继为p*/
     q->next=info;  /*新结点作为q的后继结点*/
      }
   printf("\n ----have inserted %s student----\n",info->name);    printf("---Don't forget save---\n");     /*提示存盘*/
   return(h);
}

/*保存数据到文件*/
void save(STUDENT *h)
{
   FILE *fp;         /*定义指向文件的指针*/
   STUDENT *p;
   char outfile[10];  /*保存输出文件名*/
   printf("Enter outfile name,for example c:\\f1\\te.txt:\n"); /*提示文件名格式信息*/
   scanf("%s",outfile);
   if((fp=fopen(outfile,"wb"))==NULL) /*为输出打开一个二进制文件，如没有则建立*/
   {
      printf("can not open file\n");
      exit(1);
   }
   printf("\nSaving file......\n");  /*打开文件，提示正在保存*/
   p=h;                    /*移动指针从头指针开始*/
   while(p!=NULL)        /*如p不为空*/
   {
      fwrite(p,sizeof(STUDENT),1,fp);/*写入一条记录*/
      p=p->next;        /*指针后移*/
   }
   fclose(fp);      /*关闭文件*/
   printf("-----save success!!-----\n");  /*显示保存成功*/
}

/* 从文件读数据*/
STUDENT *load()
{
   STUDENT *p,*q,*h=NULL;    /*定义记录指针变量*/
   FILE *fp;            /* 定义指向文件的指针*/
   char infile[10];       /*保存文件名*/
   printf("Enter infile name,for example c:\\f1\\te.txt:\n");   scanf("%s",infile);           /*输入文件名*/
   if((fp=fopen(infile,"rb"))==NULL)   /*打开一个二进制文件，为读方式*/
   {
      printf("can not open file\n");    /*如不能打开，则结束程序*/
      exit(1);
   }
   printf("\n -----Loading file!-----\n");
   p=(STUDENT *)malloc(sizeof(STUDENT));   /*申请空间*/
   if(!p)
   {
      printf("out of memory!\n");    /*如没有申请到，则内存溢出*/
      return h;       /*返回空头指针*/
   }
   h=p;         /*申请到空间，将其作为头指针*/
   while(!feof(fp))  /*循环读数据直到文件尾结束*/
   {
      if(1!=fread(p,sizeof(STUDENT),1,fp))
     break;  /*如果没读到数据，跳出循环*/
      p->next=(STUDENT *)malloc(sizeof(STUDENT));  /*为下一个结点申请空间*/
      if(!p->next)
      {
     printf("out of memory!\n");  /*如没有申请到，则内存溢出*/
     return h;
      }
      q=p;   /*保存当前结点的指针，作为下一结点的前驱*/
      p=p->next;   /*指针后移，新读入数据链到当前表尾*/
   }
   q->next=NULL;   /*最后一个结点的后继指针为空*/
   fclose(fp);       /*关闭文件*/
   printf("---You have success read data from file!!!---\n");
   return h;   /*返回头指针*/
}

/*排序*/
STUDENT *sort(STUDENT *h)
{
   int i=0;                  /*保存名次*/
   STUDENT *p,*q,*t,*h1;   /*定义临时指针*/
   h1=h->next;           /*将原表的头指针所指的下一个结点作头指针*/
   h->next=NULL;        /*第一个结点为新表的头结点*/
   while(h1!=NULL)    /*当原表不为空时，进行排序*/
   {
      t=h1;            /*取原表的头结点*/
      h1=h1->next;     /*原表头结点指针后移*/
      p=h;           /*设定移动指针p，从头指针开始*/
      q=h;         /*设定移动指针q做为p的前驱，初值为头指针*/
      while(t->sum<p->sum&&p!=NULL)  /*作总分比较*/
      {
     q=p;            /*待排序点值小，则新表指针后移*/
     p=p->next;
      }
      if(p==q)      /*p==q，说明待排序点值大，应排在首位*/
      {
     t->next=p;     /*待排序点的后继为p*/
     h=t;         /*新头结点为待排序点*/
      }
      else    /*待排序点应插入在中间某个位置q和p之间，如p为空则是尾部*/
      {
     t->next=p;   /*t的后继是p*/
     q->next=t;    /*q的后继是t*/
      }
   }
   p=h;               /*已排好序的头指针赋给p，准备填写名次*/
   while(p!=NULL)  /*当p不为空时，进行下列操作*/
   {
      i++;       /*结点序号*/
      p->order=i;   /*将名次赋值*/
      p=p->next;   /*指针后移*/
   }
   printf("sort sucess!!!\n");   /*排序成功*/
   return h;      /*返回头指针*/
}

/*计算总分和均值*/
void computer(STUDENT *h)
{
   STUDENT *p;   /*定义移动指针*/
   int i=0;  /*保存记录条数初值为0*/
   long s=0;   /*总分初值为0*/
   float average=0;  /*均分初值为0*/
   p=h;        /*从头指针开始*/
   while(p!=NULL)    /*当p不为空时处理*/
   {
      s+=p->sum;    /*累加总分*/
      i++;         /*统计记录条数*/
      p=p->next;   /*指针后移*/
   }
   average=(float)s/i;/* 求均分，均分为浮点数，总分为整数，所以做类型转换*/
   printf("\n--All students sum score is:%ld  average is %5.2f\n",s,average);
}

/*索引*/
STUDENT *index(STUDENT *h)
{
   STUDENT *p,*q,*t,*h1;  /*定义临时指针*/
   h1=h->next;    /*将原表的头指针所指的下一个结点作头指针*/
   h->next=NULL;   /*第一个结点为新表的头结点*/
   while(h1!=NULL)  /*当原表不为空时，进行排序*/
   {
      t=h1;        /*取原表的头结点*/
      h1=h1->next;   /*原表头结点指针后移*/
      p=h;   /*设定移动指针p，从头指针开始*/
      q=h;   /*设定移动指针q做为p的前驱，初值为头指针*/
      while(strcmp(t->no,p->no)>0&&p!=NULL)  /*作学号比较*/
      {
     q=p;           /*待排序点值大，应往后插，所以新表指针后移*/
     p=p->next;
      }
      if(p==q)   /*p==q，说明待排序点值小，应排在首位*/
      {
     t->next=p;  /*待排序点的后继为p*/
     h=t;    /*新头结点为待排序点*/
      }
      else     /*待排序点应插入在中间某个位置q和p之间，如p为空则是尾部*/
      {
     t->next=p;    /*t的后继是p*/
     q->next=t;     /*q的后继是t*/
      }
   }
   printf("index sucess!!!\n");  /*索引排序成功*/
   return h;    /*返回头指针*/
}

/*分类合计*/
void total(STUDENT *h)
{
   STUDENT *p,*q;   /*定义临时指针变量*/
   char sno[9],qno[9],*ptr;    /*保存班级号的*/
   float s1,ave;        /*保存总分和均分*/
   int i;       /*保存班级人数*/
   clrscr();    /*清屏*/
   printf("\n\n  *******************Total*****************\n");
   printf("---class---------sum--------------average----\n");
   p=h;       /*从头指针开始*/
   while(p!=NULL)  /*当p不为空时做下面的处理*/
   {
      memcpy(sno,p->no,8);  /*从学号中取出班级号*/
      sno[8]='\0';          /*做字符串结束标记*/
      q=p->next;        /*将指针指向待比较的记录*/
      s1=p->sum;      /*当前班级的总分初值为该班级的第一条记录总分*/
      ave=p->average;  /*当前班级的均分初值为该班级的第一条记录均分*/
      i=1;          /*统计当前班级人数*/
      while(q!=NULL)   /*内循环开始*/
      {
     memcpy(qno,q->no,8);   /*读取班级号*/
     qno[8]='\0';     /*做字符串结束标记*/
     if(strcmp(qno,sno)==0)  /*比较班级号*/
     {
        s1+=q->sum;     /*累加总分*/
        ave+=q->average; /*累加均分*/
        i++;         /*累加班级人数*/
        q=q->next;   /*指针指向下一条记录*/
     }
     else
        break;  /*不是一个班级的结束本次内循环*/
      }
      printf("%s     %10.2f           %5.2f\n",sno,s1,ave/i);
      if(q==NULL)
     break;   /*如果当前指针为空，外循环结束，程序结束*/
      else
     p=q;   /*否则，将当前记录作为新的班级的第一条记录开始新的比较*/
   }
   printf("---------------------------------------------\n");
}