PascalABC.net
var
i:integer;
a:array[1..10]of integer;
begin
writeln('Исходный массив:');
for i:=1 to 10 do
begin
a[i]:=random(-5,5);
write(a[i]:4);
end;
for i:=1 to 10 do
if a[i]>0 then a[i]:=a[i]+2
else a[i]:=0;
writeln;
writeln('Преобразованный массив:');
for i:=1 to 10 do
write(a[i]:4);
<span>end.</span>
-10010001 наслаждайся (это надо решать в столбик, лесенкой)
К существительному и глаголу
Кол-во операций: 4
<span>Можно ведь, чтобы сократить число операций, деление заменить на десятичные дроби, типо 5/2= 2,5 ; 3/4 = 0,75 ; 7/10 = 0.7</span>
Наверное, смородина, потому-что это скорее не растение, а еда
По поводу грибов - это не биология (грибы имеют некоторые свойства растения + они РАСТут)