次のプログラムを実行するとａの値はいくつになりますか。

　　（但し、READ(a,b);でa=6,b=9を読み込むものとする。）

　　PROGRAM toi111(input,output);
　　VAR a,b,c,d : integer;
　　　PROCEDURE okikae;
　　　　BEGIN c:=a;a:=b;b:=c END;
　　　BEGIN READ(a,b);
　　　　IF a＜b THEN
　　　　　okikae;
　　　　REPEAT
　　　　　d:=a MOD b;a:=b;b:=d
　　　　UNTIL d=0;
　　　　WRITELN(a)
　　　END.

９

１８