5 lines
109 B
Fortran
5 lines
109 B
Fortran
P = NEXTPRIME(100)
|
|
DO WHILE (P.LE.150)
|
|
...stuff...
|
|
P = NEXTPRIME(P)
|
|
END DO
|