求兩數是否互質(互素)
时间：2021-07-01 10:21:17
帮助过：25人阅读
利用輾轉相除法求兩數是否互為質數(素數)
- $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;
- }
- }
- ?>
|
