Guest User

Замена макс и мин элементов

a guest
Dec 22nd, 2015
174
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
C++ 0.88 KB | None | 0 0
  1. //объявление глобальных переменных
  2.           const n=6;
  3.           typedef float matr[n][n];
  4.           int i, j;
  5.  
  6. //кнопочка
  7. void __fastcall TForm1::Button1Click(TObject *Sender)
  8. {
  9. matr a;
  10. //ввод матрицы
  11. for (i=0; i<n; i++)
  12. for (j=0; j<n; j++)
  13. a[i][j]=StrToFloat(SG->Cells[j][i]);
  14.  
  15. float buf;
  16. //вычисление максимального элемента
  17. float max=a[0][0];
  18. for (i=0; i<n; i++)
  19. for (j=0; j<n; j++)
  20. if (max<a[i][j]) max=a[i][j];
  21. //вычисление минимального элемента
  22. float min=a[0][0];
  23. for (i=0; i<n; i++)
  24. for (j=0; j<n; j++)
  25. if (min>a[i][j]) min=a[i][j];
  26. //замена
  27. for (i=0; i<n; i++)
  28. for (j=0; j<n; j++) {
  29. buf=min;
  30. min=max;
  31. max=buf;
  32. }
  33. //вывод полученной матрицы (!!!)
  34. for (i=0; i<n; i++)
  35. for (j=0; j<n; j++)
  36. SG->Cells[j][i]=FloatToStr(max);
  37. }
Advertisement
Add Comment
Please, Sign In to add comment