Loops/Increment loop index within loop body: Difference between revisions
Loops/Increment loop index within loop body (view source)
Revision as of 20:10, 6 December 2021
, 2 years agono edit summary
ReeceGoding (talk | contribs) m (→{{header|R}}: Shortened link) |
No edit summary |
||
Line 2,896:
Same as 'while' loop version.
</pre>
=={{header|Ksh}}==
<lang ksh>
#!/bin/ksh
# Increment loop index within loop body
# # Variables:
#
integer INDX_START=42 N_PRIMES=42
# # Functions:
#
# # Function _isprime(n) return 1 for prime, 0 for not prime
#
function _isprime {
typeset _n ; integer _n=$1
typeset _i ; integer _i
(( _n < 2 )) && return 0
for (( _i=2 ; _i*_i<=_n ; _i++ )); do
(( ! ( _n % _i ) )) && return 0
done
return 1
}
######
# main #
######
integer i n=0
for ((i=INDX_START; n<N_PRIMES; i++)); do
_isprime ${i}
if (( $? )); then
printf "%,18d is prime, %2d primes found(so far)\n" ${i} $((++n))
(( i+=$i ))
fi
done</lang>
{{out}}<pre>
43 is prime, 1 primes found(so far)
89 is prime, 2 primes found(so far)
179 is prime, 3 primes found(so far)
359 is prime, 4 primes found(so far)
719 is prime, 5 primes found(so far)
1,439 is prime, 6 primes found(so far)
2,879 is prime, 7 primes found(so far)
5,779 is prime, 8 primes found(so far)
11,579 is prime, 9 primes found(so far)
23,159 is prime, 10 primes found(so far)
46,327 is prime, 11 primes found(so far)
92,657 is prime, 12 primes found(so far)
185,323 is prime, 13 primes found(so far)
370,661 is prime, 14 primes found(so far)
741,337 is prime, 15 primes found(so far)
1,482,707 is prime, 16 primes found(so far)
2,965,421 is prime, 17 primes found(so far)
5,930,887 is prime, 18 primes found(so far)
11,861,791 is prime, 19 primes found(so far)
23,723,597 is prime, 20 primes found(so far)
47,447,201 is prime, 21 primes found(so far)
94,894,427 is prime, 22 primes found(so far)
189,788,857 is prime, 23 primes found(so far)
379,577,741 is prime, 24 primes found(so far)
759,155,483 is prime, 25 primes found(so far)
1,518,310,967 is prime, 26 primes found(so far)
3,036,621,941 is prime, 27 primes found(so far)
6,073,243,889 is prime, 28 primes found(so far)
12,146,487,779 is prime, 29 primes found(so far)
24,292,975,649 is prime, 30 primes found(so far)
48,585,951,311 is prime, 31 primes found(so far)
97,171,902,629 is prime, 32 primes found(so far)
194,343,805,267 is prime, 33 primes found(so far)
388,687,610,539 is prime, 34 primes found(so far)
777,375,221,081 is prime, 35 primes found(so far)
1,554,750,442,183 is prime, 36 primes found(so far)
3,109,500,884,389 is prime, 37 primes found(so far)
6,219,001,768,781 is prime, 38 primes found(so far)
12,438,003,537,571 is prime, 39 primes found(so far)
24,876,007,075,181 is prime, 40 primes found(so far)
49,752,014,150,467 is prime, 41 primes found(so far)
99,504,028,301,131 is prime, 42 primes found(so far)</pre>
=={{header|Lua}}==
| |||