FILE * mat;
	mat=fopen("szimmetrikus.dat", "w");
	fprintf(mat, "#A matrix sajatertekei:\n");
	for(k=0;k<3;k++)
		{	
		fprintf(mat, "%24.16lf ", W[k]);
		}
	fprintf(mat, "\n#A hozzajuk tartozo sajatvektorok:\n");
	for(k=0;k<3;k++)
		{
		for(l=0;l<3;l++)
			{	
			fprintf(mat, "%24.16lf ", A[k+3*l]);
			}
			fprintf(mat, "\n");
		}
	fprintf(mat, "#A sajatvektorok normai:\n");
	double norma;
	for(l=0;l<3;l++)
		{
		norma=0;
		for(k=0;k<3;k++)
			{
			norma=norma+pow(A[k+3*l],2);	
			}
			norma=sqrt(norma);
			fprintf(mat, "%24.16lf ", norma);
		}
	fprintf(mat, "\n");
	fclose(mat);