Ответ:
анера -арена
анизрок - корзина
казкюр - рюкзак
руко -
урок
евнса - весна
омркмоу одджь ен тсарешн - мокрому дождь не страшен
Efhewjsissiaiaoaooa111q11111
const
N=5;
var
a:array [1..N] of integer;
i,k,count:integer;
begin
for i:=1 to N do
begin
a[i]:=random(20);
write(a[i]);
end;
for i:=1 to N do
begin
count:=0;
k:=2;
if a[i] < 2 then count:=1;
while (k*k<=a[i]) and (count = 0) do
begin
if a[i] mod k = 0 then inc(count);
inc(k);
end;
if count = 0 then write(i);
end;
end.
Если есть Excel, можно посмотреть.
2468,6824,4682,2486,2684,2648,6248,6842,2846,2864,6284,8642,8624,8264,8246,8426,8462,4862,4826,4286,4268,4628,4682.