M027. Матрисаи ҳақиқии A(N,M) дода шудааст. Барномаи иваз намудани ҳама аъзоҳои манфии матриса бо аъзое, ки қимати мутлақи максималӣ дорад, тартиб дода шавад. Матрисаҳои ибтидоӣ ва ислоҳшуда чоп карда шаванд.

<?php
$N=rand(3,7);
$M=rand(3,7);

echo "N=$N<br>M=$M<br>";
?>
<table border="1">
<?php for($i=0; $i<$N; $i++) { ?>
<tr>
<?php for($j=0; $j<$M; $j++) { ?>
	<td><?php echo "A<sub>$i$j</sub>=", $a[$i][$j]=rand(-20,20); ?></td>
<?php } ?>
</tr>
<?php } ?>
</table>
<?php 
$max=abs($a[0][0]);
$x=$a[0][0];
for($i=0; $i<$N; $i++)
	for($j=0; $j<$M; $j++)
		if($max<abs($a[$i][$j])){ 
			$max=abs($a[$i][$j]);
			$x=$a[$i][$j];
		}
for($i=0; $i<$N; $i++)
	for($j=0; $j<$M; $j++)
		if($a[$i][$j]<0) $a[$i][$j]=$x;
 echo  "MAX_abs=",$max;

?>
<table border="1">
<?php for($i=0; $i<$N; $i++) { ?>
<tr>
<?php for($j=0; $j<$M; $j++) { ?>
	<td><?php  echo "A<sub>$i$j</sub>=", $a[$i][$j]; ?></td>
<?php } ?>
</tr>
<?php } ?>
</table>