Скачиваний:
11
Добавлен:
01.05.2014
Размер:
627 б
Скачать
const int n = 5;
const int m = 5;
const float PI = 3.14;

fmatr M1[5, 5], M2[5, 2], M3[2, 5];

int i, j;
float k, v;
float ARR[5][3][2];
int a1[7];

void main()
{
  if (M1[1, 2] > M1[2, 3]);

  for (i = 0; i < n; i = i + 1)
    for (j = 0; j < 2; j = j + 1)
      scan(M2[i, j]);

  k = M2[2,  1];
  for (i = 0; i < 2; i = i + 1)
    for (j = 0; j < m; j = j + 1)
      scan(M3[i, j]);

  M1 = M2 * M3;
  if (det(M1) != 0) {
    M3 = transpose(M2);
    for (i = 0; i < n; i = i + 1)
      for (j = 0; j < m; j = j + 1)
        print(M1[i, j]);
  }
  print(PI, i, j);
  scan(ARR[1][i][3]);

}
Соседние файлы в папке kurs