<span>Var m:array[1..100] of integer<span>;
</span>i,n:integer<span>;
</span>begin
write('Введите размерность массива: ');readln(n)<span>;
</span>writeln('Введите массив: '<span>)
</span>for i:=1 to N <span>do
</span>readln(m[i])<span>;
</span>writeln('Массив: ')<span>;
</span>for i:=1 to N <span>do
</span>if M[i]>0 then write(M[i],' ')<span>;
</span>for i:=1 to N <span>do
</span>if M[i]<0 then write(M[i],' ')<span>;
</span>end.
</span>
Живая и неживая природа . Все в природе взаимосвязаны невидимыми нитями которые окружают нас всех. Не будь солнца все погибнет , не будь воды все погибнет , не будь комаров погибнут все начиная с тех кто ими питается и все пойдёт по цепочке , то есть по невидимым нам нитями процесс разрушения.
1 - маховая кисть; 2 - флейцевая кисть; 3 - кисть-макловица; 4 - кисть-ручник; 5 - филеночная кисть; 6 - кисть-торцовка; 7 - стальные щетки; 8 - валик; 9 - металлический шпатель.