:从键盘输入N个整数，求得有多少个素数，并输出到屏幕。
（要求把素数打出来）

const maxn=10000;
var i,n,ans:longint;
a:array[1..maxn] of longint;
function su(x:longint):boolean;
var i:longint;
begin
for i:=2 to trunc(sqrt(x)) do
if x mod i=0 then exit(false);
exit(true);
end;
begin
readln(n);
for i:=1 to n do
read(a[i]);
readln;
ans:=0;
for i:=1 to n do
if su(a[i]) then
begin
write(a[i],' ');//输出素数
inc(ans);
end;
writeln;
writeln(ans);//输出数量
end.