Файл 13 Каранин Алексей 08-ПМ Лабораторная работа 13 Матрицы Вариант З

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
/*
Файл 13.c
Каранин Алексей 08-ПМ
Лабораторная работа 13: Матрицы
Вариант 7
Задание: Дана прямоугольная матрица A (NxM) и натуральные числа p,q
(p<=N, q<=M).Поменять в матрице местами p-й и q-й столбцы
Исходную и полученную матрицы вывести на печать.
*/
#include <stdio.h>
#include <stdlib.h>
#include <malloc.h>
void main()
{
double *a;
int m,n,i,j,p,q;
FILE *fin, *fout;
fin=fopen("13_in.txt","r");
if (fin==NULL)
{printf("Can't open file 13_in.txt\n"); exit(1);}
fout=fopen("13_out.txt","w");
if (fout==NULL)
{printf("Can't open file 13_out.txt\n"); exit(1);}
fscanf(fin,"%d %d %d %d",&n,&m, &p , &q);
a=(double *)malloc(m*n*sizeof(double));
if (a==NULL) {printf("Can't allocate memory\n");exit(1);}
for (i=0; i<n; i++)
for (j=0; j<m; j++)
fscanf(fin, "%lf", &a[i*n+j]);
fprintf(fout, "\nИсходная матрица размером %d x %d\n",n,m);
for (i=0; i<n; i++)
{
for (j=0; j<m; j++)
fprintf(fout,"%5.1lf", a[i*n+j]);
fprintf(fout,"\n");
}
fprintf(fout, "\nРезультат: \n");
for (i=0; i<n; i++)
{
j=a[i*n+p];
a[i*n+p]=a[i*n+q];
a[i*n+q]=j;
}
for (i=0; i<n; i++)
{
for (j=0; j<m; j++)
fprintf(fout,"%5.1lf",a[i*n+j]);
fprintf(fout,"\n");
}
}