找到矩阵A（5,8）的每一行的负元素的最大绝对值，并将它们重新排列到第一列[关闭]

作者: Innate Mind
发布时间: 2024-05-26 12:38:00 (1月前)
转自：

2 条回复

0#
回复此人
甲基蓝 | 2019-08-31 10-32

<div class =“post-text”itemprop =“text”> <P> 提示：您可以用不同的方式声明矩阵： </p> <pre> <code> type TMatrixRow = array[1..8] of Iteger; TMatrix = array[1..5] of TMatrixRow; var a: TMatrix; </code> </pre> <P> 然后根据需要创建重新排列行值的过程： </p> <pre> <code> procedure RearrangeRow(var r: TMatrixRow); begin // Your code here end; </code> </pre> <P> 最后为每一行调用此过程： </p> <pre> <code> for i := 1 to 5 do RearrangeRow(a[i]); </code> </pre> <P> 请注意，您仍然可以通过常规方式访问矩阵元素 <code> a[row, column] </code> </p> </DIV>

编辑

登录后才能参与评论