Concatenate two primes is also prime: Difference between revisions

m
→‎{{header|REXX}}: simplified a DO loop.
m (added a period to a sentence in the task preamble.)
m (→‎{{header|REXX}}: simplified a DO loop.)
Line 175:
a.= 0 /*array of "2cat" primes */
do j=1 for ## /*search through specified primes. */
do k=1 for ##; cat2= @.j || @.k /*create a concatenated " " " " prime (base 10)*/
cat2=if @!.jcat2 ||then @a.kcat2= 1 /*flag it as being a /*create"2cat" a concatenated prime. (base 10)*/
if !.cat2end /*k*/ then a.cat2= 1 /*flag it[↑] as being aforgoes the "2cat"need for primesorting. */
end /*k*/ /* [↑] forgoes the need for sorting. */
end /*j*/
found= 0; idx= 1 /*initialize # of primes found; IDX. */