M019. Массиви ададҳои ҳақиқӣ а0,...,аn-1 дода шудааст. Дар массиви додашуда ҳамаи ҷуфтҳои (аi,аi+1), ки аi*аi+1 ба 10 каратӣ ҳастанд, ёфта шаванд.
Дан массив целых чисел а0,...,аn-1. Найти в данной последовательности все пары (аi,аi+1), такие, что аi*аi+1 кратно 10.
<?php
$N=10;
for($i=0; $i<$N; $i++)
echo $i,"| ",$x[$i]=rand(-50,50),"<br>";
for($i=0; $i<$N-1; $i++) {
$r=$x[$i]*$x[$i+1];
if($r==10*(int)($r/10))
echo "x[",$i,"]=",$x[$i]," x[",$i+1,"]=",$x[$i+1],"<br>";
}
?>