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