M001. Массиви ададҳо а0,...,аn-1 дода шудааст. Муайян карда шавад, ки оё дар массиви додашуда ду адади мусбати паси ҳам омада мавҷуданд. Миқдори чунин ҷуфтҳо шуморида шавад.

<?php
$x=array();
for($i=0;$i<10;$i++)
$x[$i]=rand(-50,50);
$n=count($x);
echo "N=$n<br>";
$p=0;
for($i=0;$i<$n-1;$i++){
echo"$i|$x[$i]<br>";
if($x[$i]>0 and $x[$i+1]>0) $p++;
}
echo"$i|$x[$i]<br>";
echo "Миқдори ҷуфтҳо - $p";
?>