////#include <iostream>
////#include <ctime>
////#include <cmath>
////#include <cstdlib>
////#define SIZE 99
////#define SQSIZE 9
////int main()
////{
////	setlocale(LC_CTYPE, "Russian");
////	using namespace std;
////	int i, sz, k, sz1;
////	double A[SIZE], B[SQSIZE], C[SQSIZE];
////	int rmx = 99;
////	cout << "Введите размер матрицы ";
////	cin >> sz;
////	cout << "Введите номер столбца k ";
////	cin >> k; k--;
////	cout << endl;
////	cout << "Матрица А к записи в исходный .bin файл:" << endl;
////	srand((unsigned)time(NULL));
////	for (i = 0; i < pow(sz, 2); i++)
////	{
////		if (i != 0 && i % sz == 0)
////			cout << endl;
////		A[i] = (((double)rand() / (double)RAND_MAX) * rmx);
////		cout << A[i] << "\t";
////	}
////	cout << endl << endl;
////	FILE *fp, *fa;
////	errno_t err;
////	err = fopen_s(&fp, "a.bin", "wb+");
////	if (err != 0)
////	{
////		perror("ошибка открытия a.bin");
////		return EXIT_FAILURE;
////	}
////	fwrite(&sz, sizeof(int), 1, fp);
////	fseek(fp, sizeof(int), SEEK_SET);
////	fwrite(A, sizeof(double), pow(sz, 2), fp);
////	fseek(fp, 0, SEEK_SET);
////	fread(&sz1, sizeof(int), 1, fp);
////	cout << "Столбец матрицы номер " << k + 1 << " для записи в новый файл:" << endl;
////	for (int i = 0; i < sz1; i++)
////	{
////		fseek(fp, sizeof(int) + sizeof(double) * k + sizeof(double) * i * sz1, SEEK_SET);
////		fread((B + i), sizeof(double), 1, fp);
////		cout << B[i] << endl;
////	}
////	fclose(fp);
////	err = fopen_s(&fa, "b.bin", "wb+");
////	if (err != 0)
////	{
////		perror("ошибка открытия b.bin");
////		return EXIT_FAILURE;
////	}
////	fwrite(B, sizeof(double), sz1, fa);
////	fseek(fa, 0, SEEK_SET);
////	cout << "Сожержимое нового файла:" << endl;
////	fread(C, sizeof(double), sz1, fa);
////	for (int i = 0; i < sz1; i++)
////	{
////		cout << C[i] << '\t';
////	}
////	cout << endl;
////	fclose(fa);
////}
//#define _CRT_SECURE_NO_WARNINGS
//#include <stdlib.h>
//#include <stdio.h>
//#include <iostream>
//using namespace std;
//void transpose(double **mas, int *rows, int *cols)
//{
//	double temp;
//	int i, j;
//
//	for (i = 0; i < *rows; i++)
//		for (j = 0; j < *cols; j++)
//		{
//			temp = mas[i][j];
//			mas[i][j] = mas[j][i];
//			mas[j][i] = temp;
//		}
//
//	*rows = *rows + *cols;
//	*cols = *rows - *cols;
//	*rows = *rows - *cols;
//}
//
//int main()
//{
//	double **mas;
//	char buff;
//	int n = 0, m;
//	int res;
//	int i, j;
//
//	FILE *in;
//
//	if ((in = fopen("in.txt", "r")) == NULL)
//		return 1;
//
//	while ((buff = fgetc(in)) != EOF)
//		if (buff == '\n')
//			n++;
//
//	fseek(in, 0, SEEK_SET);
//	fscanf(in, "%d", &m);
//
//	res = (m > n) ? m : n;
//
//	mas = (double **) malloc (res * sizeof(double *));
//
//	for (i = 0; i < res; i++)
//		mas[i] = (double *)malloc(res * sizeof(double));
//
//	for (i = 0; i < n; i++)
//		for (j = 0; j < m; j++)
//			fscanf(in, "%lf", &mas[i][j]);
//
//	transpose(mas, &n, &m);
//
//	FILE *out;
//
//	if ((out = fopen("out.txt", "w")) == NULL)
//		return 1;
//
//	for (i = 0; i < n; i++)
//	{
//		for (j = 0; j < m; j++)
//			fprintf(out, "%lf ", mas[i][j]);
//
//		fprintf(out, "\n");
//	}
//
//	fclose(in);
//	fclose(out);
//
//	for (i = 0; i < res; i++)
//		free(mas[i]);
//
//	free(mas);
//
//	return 0;
//}