while 文

while (条件式) do
...;
...;
...;
end_while;

例えば、 あらかじめ 整数 $p$ が決まっているとき、 $p$ をそれ以上の最小の素数に修正するには、

 while (isprime(p)<> TRUE) do
 p:=p+1:
 end_while:
 print (["using p=", p]);

とすればよろしい。