Loops/Increment loop index within loop body: Difference between revisions
Content added Content deleted
ReeceGoding (talk | contribs) m (→{{header|R}}: Shortened link) |
No edit summary |
||
Line 2,896: | Line 2,896: | ||
Same as 'while' loop version. |
Same as 'while' loop version. |
||
</pre> |
</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}}== |
=={{header|Lua}}== |