M028. Матрисаи квадратии A(N,N) дода шудааст. Барномаи муайян намудани миқдори аъзоҳои ҷуфти дар диагоналҳои асосӣ ва иловагӣ воқеъбуда тартиб дода шавад.
<?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 echo "<span style='color: #f00000; font-weight: bold'>"; echo "A<sub>$i$j</sub>=", $a[$i][$j]=rand(-10,20); echo "</span>"; ?> </td> <?php } ?> </tr> <?php } ?> </table> <?php $k=0; $fl=0; for($i=0; $i<$N; $i++) for($j=0; $j<$N; $j++){ if($i==$j && $a[$i][$j]==2*(int)($a[$i][$j]/2)) $k++; if($i+$j==$N-1 && $a[$i][$j]==2*(int)($a[$i][$j]/2)) $k++; } echo "Миқдори аъзоҳои ҷуфт дар диагоналҳои асосӣ ва иловагӣ: $k<br>"; ?>