begin
var m := 1;
var n := 10;
foreach var i in range(m, n) do
var d := 2;
while (d < i) and (i mod d <> 0) do d += 1;
if d < i then Print(i)
end
end.
begin
var m := 1;
var n := 10;
foreach var i in range(m, n) do
begin
var d := 2;
while (d < i) and (i mod d <> 0) do d += 1;
if d < i then Print(i)
end
end.