利用輾轉相除法求兩數是否互為質數(素數)
<?php
$a=200;
$b=13;
//輾轉相除法
if($b>$a){
$x=$a;$a=$b;$b=$x;
}
while(1){
//echo "a=".$a." b=".$b;echo "\n";
if($b==1){echo "互質";break;}
if($b==0){echo "不互質";break;}
if($a-$b > $b){
$a=$a-$b;
}else{
$a=$a-$b;
$x=$a;$a=$b;$b=$x;
}
}
?>