質問させてください。

100 FOR x=1 TO 100
110 FOR y=x TO 100
120 LET a=x
130 LET b=y
140 DO
150 LET r=MOD(a,b)
160 IF r=0 THEN EXIT DO
170 LET a=b
180 LET b=r
190 LOOP
200 IF b=1 THEN
210 LET z=SQR(\(x^{2}\)+\(y^{2}\))
220 IF INT(z)=z THEN PRINT x,y,z
230 END IF
240 NEXT y
250 NEXT x
260 END

BASICプログラムですが、実行結果の表示とプログラムの意味が
理解できません。ルート(\(x^{2}\)+\(y^{2}\)=z)の表示になるのですが、
特に前半のDo～LOOP構文の意味がいまいち理解できません。
アドバイスをお願いいたします。

★希望★完全解答★