mirror of
https://codeberg.org/ProgramSnail/truffle-lama.git
synced 2025-12-06 06:48:47 +00:00
22 lines
283 B
Text
22 lines
283 B
Text
var s, n, p;
|
|
|
|
s := 0;
|
|
n := read ();
|
|
p := 2;
|
|
|
|
while n > 0 do (
|
|
var c = 2, f = 1;
|
|
|
|
while c*c <= p && f do
|
|
f := (p % c) != 0;
|
|
c := c + 1
|
|
od;
|
|
|
|
if f != 0 then
|
|
if n == 1 then write (p) else skip fi;
|
|
n := n - 1
|
|
else skip fi;
|
|
|
|
p := p + 1
|
|
)
|
|
od
|