вобще меня учитель учил это делать так:
1) Семь
2) Три
Решение могу записать в комментарии, если нужно
<span>const n = 15;</span>
<span>var</span>
<span> a: array[1..n] of integer;</span>
<span> i, count: integer;</span>
<span>begin</span>
<span> for i := 1 to n do begin</span>
<span> a[i] := random(100);</span>
<span> write(a[i], ' ');</span>
<span> if(i mod 2 = 0) and (a[i] mod 2 <> 0) then inc(count);</span>
<span> end;</span>
<span> writeln;</span>
<span> writeln('[', count, ']');</span>
<span>end.</span>
Если все голуби-птицы,а все птицы-животные,то все голуби являются животными:)
Орёл - зрение, Волк обоняние, Летучая мышь - слух, Крот - осязание.