12 lines
105 B
Plaintext
12 lines
105 B
Plaintext
INT tot
|
|
INT n
|
|
INT j
|
|
INT te
|
|
IN INT tot numero massimo
|
|
SET n 0
|
|
:scn
|
|
:sieve
|
|
MOD n j te
|
|
JE sieve tot
|
|
OUT $n$
|