P:=100; WHILE (P:=NextPrime(P)) <= 150 DO stuff;