***program start***
100 N=100
110 P=2
120 B=0
130 while B<N
140   Q=0
150   for K=1 to P
190     R=mod(P,K)
200     if R=0 then Q=Q+1
210   next
220   if Q<=2 then
230     B=B+1
240     print format("No.%D  ",B)+format("%D",P)
250    end if
260   P=P+1
270 end while
280 end
***program end***