从键盘读入n个整数（升序），请编写算法实现：  建立带表头结点的单链表；  显示单链表，（形如：H->10->20->30->40）;  在有序单链表中插入新的数据元素x；  将单链表就地逆


#include <stdio.h>

#include <stdlib.h>

#include <malloc.h>

typedef struct node       //定义结点

{

    int data;

    struct node *next;

}LNode; 

void print(LNode *h);                                   //打印函数

void insert(LNode *h);         //插入函数

void change(LNode *h);         //逆置函数

LNode *create();          //创建函数

void hebing(LNode *h,LNode *m,LNode *c);    //合并函数

int main(){

 LNode *h,*m,*c;

 int i;

 printf("**********************************\n");     //主菜单

 printf("       请选择要进入的系统\n");

 printf("        1.创建一个单链表\n");

 printf("        2.打印单链表\n");

 printf("        3.插入一个数据\n");

 printf("        4.将单链表逆置\n");

 printf("        5.两个升序单链表合并\n");

 printf("        6.退出系统\n");

 printf("\n");

 while(1){

  scanf("%d",&i);

  switch(i){          //选择菜单

  case 1:

   h=create();break;

  case 2:

   print(h);break;

  case 3:

   insert(h);break;

  case 4:

   change(h);break;

  case 5:

   m=create();

      hebing(h,m,c);

   break;

  case 6: return 0;

  }

 printf("**********************************\n");

 printf("       请选择要进入的系统\n");

 printf("        1.创建一个单链表\n");

 printf("        2.打印单链表\n");

 printf("        3.插入一个数据\n");

 printf("        4.将单链表逆置\n");

 printf("        5.两个升序单链表合并\n");

 printf("        6.退出系统\n");

 printf("\n");

 }

 fflush(stdin);

}                    

void print(LNode *h){     //打印函数，定义r为头结点之后的结点，遍历单链表输出

 LNode *r;

 printf("\n");

 printf("输出链表内容为：\n");

 printf("\n");

 r=h->next;

 while(r!=NULL){

  printf("%d\t",r->data);

  r=r->next;

 }

 printf("\n");

}

void insert(LNode *h){    //插入函数

 LNode *p,*q,*s;

 int x;

 printf("\n");

 printf("输入插入的数x的值为：\n");

 printf("\n");

 scanf("%d",&x);

 s=(LNode*)malloc(sizeof(LNode));

 p=h->next;

 q=h;

 s->data=x;

 while(p!=NULL&&p->data<=x){

  q=p;

  p=p->next;

 }

 if(p&&(p->data>=x)){

  s->next=p;

  q->next=s;

 }

 else{

  s->next=NULL;

  q->next=s;

 }

 return;

}

void change(LNode *h){     //逆置函数

 LNode *p,*q;

    if(h->next==NULL)return;

 if((h->next)->next==NULL)return;

 p=(h->next)->next;

 (h->next)->next=NULL;

 while(p!=NULL){

  q=p;

  p=p->next;

  q->next=h->next;

  h->next=q;

 }

}

LNode *create(){        //创建链表函数

 int n;

 LNode *head,*p,*q;

 head=(LNode*)malloc(sizeof(LNode));

    q=head;

 printf("\n");

    printf("输入元素个数:\n");

    scanf("%d",&n);

 printf("\n");

    if(n>0){

        printf("请输入数字:\n");

  printf("\n");

        while(n>0) {

            p=(LNode*)malloc(sizeof(LNode));

   scanf("%d",&p->data);

            q->next=p;

            q=p;

            n--;

  }

    }

    q->next=NULL;

 return(head);

}

void hebing(LNode *h,LNode *m,LNode *c)       //合并逆序函数

{ 

    LNode *pa,*pb,*s; 

 pa=h->next;

 if(pa->data>pa->next->data)

  change(h);

    pa=h->next; 

    pb=m->next; 

    c=h; 

    c->next=NULL; 

    free(m); 

    while(pa!=NULL&&pb!=NULL) 

    { 

        if(pa->data<pb->data) 

        { 

            s=pa;  

            pa=pa->next; 

        } 

        else 

        { 

            s=pb; 

            pb=pb->next; 

        } 

        s->next=c->next; 

        c->next=s; 

    } 

    if(pa==NULL) 

        pa=pb; 

    while(pa!=NULL) 

    { 

        s=pa; 

        pa=pa->next; 

        s->next=c->next; 

        c->next=s; 

    } 

 print(h);

 return;

}