M019. Массиви ададҳои ҳақиқӣ а0,...,аn-1 дода шудааст. Дар массиви додашуда ҳамаи ҷуфтҳои (аii+1), ки аii+1 ба 10 каратӣ ҳастанд, ёфта шаванд.

Дан массив целых чисел а0,...,аn-1. Найти в данной последовательности все пары (аii+1), такие, что аii+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>";
}
?>