M030. Матрисаи квадратии A(N,N) дода шудааст. Барномаи иваз намудани аъзоҳои мусбати болои диагонали асосӣ воқеъбуда ва ба 5 каратӣ буда бо 0 тартиб дода шавад. Матрисаҳои ибтидоӣ ва ислоҳшуда чоп карда шаванд.
<?php
$N=rand(4,7);
echo "N=$N<br>";
?>
<table border="1">
<?php for($i=0; $i<$N; $i++) { ?>
<tr>
<?php for($j=0; $j<$N; $j++) { ?>
<td>
<?php
if($i<$j) echo "<span style='color: #f00000; font-weight: bold'>";
echo "A<sub>$i$j</sub>=", $a[$i][$j]=rand(-10,20);
if($i<$j) echo "</span>";
?>
</td>
<?php } ?>
</tr>
<?php } ?>
</table>
<?php
for($i=0; $i<$N; $i++)
for($j=0; $j<$N; $j++)
if($i<$j && $a[$i][$j]==5*(int)($a[$i][$j]/5) && $i>0)
$a[$i][$j]=100;
?>
<table border="1">
<?php for($i=0; $i<$N; $i++) { ?>
<tr>
<?php for($j=0; $j<$N; $j++) { ?>
<td>
<?php
if($i<$j) echo "<span style='color: #f00000; font-weight: bold'>";
echo "A<sub>$i$j</sub>=", $a[$i][$j];
if($i<$j) echo "</span>";
?>
</td>
<?php } ?>
</tr>
<?php } ?>
</table>