Задача 19. Дан массив целых чисел а₀,...,а_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>";
}
?>