稀疏矩阵加法 (20 分)

给定两个矩阵A和B，求其和矩阵C=A+B。

输入格式:

第一行包含两个数Row和Col，分别表示矩阵的行数和列数，A和B的维度是一致的。

第二行只有一个数N1​，表示接下来要输入的A中的非零元素的个数。

接下来是N1​行，每一行都是i j A[i,j] 这样的形式，表示的A中第i行第j列的元素A[i,j]，为了与大多数编程语言保持一致，它们都是从零开始的，也就是说下标的有效范围是[0,Row−1]×[0,Col−1]。

在N1​行之后，是一个数N2​，表示矩阵B中非零元素的数量，此后N2​行描述B中的非零元素，它们与此前描述A中非零元素的形式一致。

矩阵元素的输入均遵循行主序。这里的所有的输入均可用int类型正确表示，可以假设输入均是合法的。

输出格式:

第一行输出和矩阵C=A+B中的绝对值大于0.1的元素个数N3​，此后是N3​行，按照行主序输出其中的非零元素，依次是行、列的下标和对应的元素。

输入样例:

2 2
1
1 1 1
1
0 0 1

结尾无空行

输出样例:

2
0 0 1
1 1 1

结尾无空行

C语言代码：

#include<stdio.h>
#include<stdlib.h>
typedef struct List
{
	int row,col;
	int data;
	struct List *next;
}L; 
L *create_l(int N)
{
	L *head=(L*)malloc(sizeof(L));
	head->next =NULL;
	head->data =N;
	if(!N)
	{
		head->next =NULL;	
		return head;
	}	
	
	L *ptail;
	ptail=head;	
	for(int i=0;i<N;i++)
	{
		L *pnew=(L*)malloc(sizeof(L));
		if(scanf("%d%d%d",&pnew->row,&pnew->col,&pnew->data))
		{
		}
		pnew->next =NULL;
		ptail->next=pnew;
		ptail=pnew;
	}
	return head;
}
L * function(L *head_1,L *head_2)
{
	//head_1或head_2为空 
	if(!head_1 || !head_2)
	{
		if(!head_1)
			return head_2;		
		if(!head_2)
			return head_1;		
	}
	
	
	L *p=head_1->next ;
	L *q=head_2->next ;
	L *head=(L*)malloc(sizeof(L));
	head->next =NULL;
	L *ptail=head;
	int cnt=0;
	while(p && q)
	{
		if(p->row == q->row && p->col == q->col)
		{
			if(p->data + q->data!=0)
			{
				L *pnew=(L*)malloc(sizeof(L));
				pnew->row =p->row ;
				pnew->col =p->col ;
				pnew->data =p->data + q->data;
				pnew->next =NULL;
				ptail->next=pnew;
				ptail=pnew;
				cnt++;
			}
			p=p->next ;
			q=q->next ;
		}
		else if(p->row != q->row)
		{
			if(p->row < q->row )
			{
				L *pnew=(L*)malloc(sizeof(L));
				pnew->row =p->row ;
				pnew->col =p->col ;
				pnew->data =p->data;
				pnew->next =NULL;
				ptail->next=pnew;
				ptail=pnew;
				p=p->next ;
				cnt++;
			}
			else
			{
				L *pnew=(L*)malloc(sizeof(L));
				pnew->row =q->row ;
				pnew->col =q->col ;
				pnew->data =q->data;
				pnew->next =NULL;
				ptail->next=pnew;
				ptail=pnew;
				q=q->next ;
				cnt++;
			}
		}
		else
		{
			if(p->col < q->col )
			{
				L *pnew=(L*)malloc(sizeof(L));
				pnew->row =p->row ;
				pnew->col =p->col ;
				pnew->data =p->data;
				pnew->next =NULL;
				ptail->next=pnew;
				ptail=pnew;
				p=p->next ;
				cnt++;
			}
			else
			{
				L *pnew=(L*)malloc(sizeof(L));
				pnew->row =q->row ;
				pnew->col =q->col ;
				pnew->data =q->data;
				pnew->next =NULL;
				ptail->next=pnew;
				ptail=pnew;
				q=q->next ;
				cnt++;
			}
		}
	}
	if(p)
	{
		ptail->next =p;
		L *temp=p;
		while(p)
		{
			cnt++;
			p=p->next ;
		}
	}
	else if(q)
	{
		ptail->next =q;
		while(q)
		{
			cnt++;
			q=q->next ;
		}
	}
	head->data =cnt;
	return head; 
}
void print_lt(L *head)
{
	L *p=head;
	printf("%d\n",p->data);
	p=p->next ;
	while(p)
	{
		printf("%d %d %d\n",p->row,p->col,p->data);
		p=p->next ;
	}
	return;
}
int main(void)
{	
	int r,c;
	if(scanf("%d%d",&r,&c))
	{
	}
	int N1,N2;
	if(scanf("%d",&N1))
	{
	}	
	L *lt_1;
	lt_1=create_l(N1);
	if(scanf("%d",&N2))
	{
	}
	L *lt_2;
	lt_2=create_l(N2);
	
	L *head=function(lt_1,lt_2);
	print_lt(head);
	return 0;	
}