Как назвать эту группу слов одним 1. солнце , воздух , ветер , почва. 2. автомобиль , корабль , самолёт , поезд. 3. стол , стул , диван , шкаф . 4. автомобиль , самолёт , стул , стол . 5.
человек , звери , рыбы , птицы , насекомые , растения.

Природа, транспорт, мебель, предметы, живые организмы) 

Поздравительный
письменный

Var 
a:array[1..10] of integer;
n,i,s:integer;
begin
 for i:=1 to 10 do
  a[i]:=random(11);
 for i:=1 to 10 do
  if a[i] mod 2=0
   then write(i,);
 readln
end.

Чертишь крест 10 на 10 ставишь через клеточку цифру в правую сторону 1 2 3 4 и так до десяти а в левую -1 -2 -3 -4 -5 -6 и так до 10 .потом верх пишешь 1 2 3 4 5 и так до 10 а в низ -1 -2 -3 -4 -5 и так до десяти и все делаешь потом координаты например 2, -3 значит в правую 2 клеточки и если - то 3 клетки вниз и соединяешь эти точки