Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- //объявление глобальных переменных
- const n=6;
- typedef float matr[n][n];
- int i, j;
- //кнопочка
- void __fastcall TForm1::Button1Click(TObject *Sender)
- {
- matr a;
- //ввод матрицы
- for (i=0; i<n; i++)
- for (j=0; j<n; j++)
- a[i][j]=StrToFloat(SG->Cells[j][i]);
- float buf;
- //вычисление максимального элемента
- float max=a[0][0];
- for (i=0; i<n; i++)
- for (j=0; j<n; j++)
- if (max<a[i][j]) max=a[i][j];
- //вычисление минимального элемента
- float min=a[0][0];
- for (i=0; i<n; i++)
- for (j=0; j<n; j++)
- if (min>a[i][j]) min=a[i][j];
- //замена
- for (i=0; i<n; i++)
- for (j=0; j<n; j++) {
- buf=min;
- min=max;
- max=buf;
- }
- //вывод полученной матрицы (!!!)
- for (i=0; i<n; i++)
- for (j=0; j<n; j++)
- SG->Cells[j][i]=FloatToStr(max);
- }
Advertisement
Add Comment
Please, Sign In to add comment