Влага - основной источник жизни для растений. Вода растворяет питательные вещества, образуя почвенный раствор, впитываемый корнями. Недостаток влаги приводит к преждевременному старению и сокращению продуктивного периода жизни. Растения хуже плодоносят, легче подвергаются болезням, становятся не переносить стойкие морозы. Избыток влаги не менее вреден. В переувлажненной почве нарушается газообмен, что приводит к загниванию и отмиранию корневой системы. Помимо этого возрастает опасность заражения листьев и плодов паршой и грибковыми заболеваниями.
Поскольку на любом приусадебном участке можно увидеть ягодники, плодовые кусты и деревья, поговорим об их правильном поливе - залоге обильного и богатого урожая.
Необходимость в поливе напрямую зависит от погоды, состояния почвы и потребности самих растений. Оптимальная влажность почвы для плодового сада - 65-80%. На разных этапах развития садовые культуры требуют различного количества воды.
Ранней весной достаточно влаги тающего снега. В конце мая и июне, в период вегетации, интенсивного роста, цветения и закладки почек плодово-ягодные растения расходуют большое количество воды. Важно позаботиться об обильном поливе и следить за тем, чтобы в это время почва вокруг растений не пересыхала. В дальнейшем потребность в воде заметно снижается и ограничивается дождевой влагой. Однако в случае засушливого лета в сентябре проводят дополнительный полив, так как в это время происходит активное накопление питательных веществ, обеспечивающих зимостойкость.
Все плодово-ягодные культуры поливают ранним утром или в вечерние часы, до захода солнца. В это время испарение влаги из почвы минимально. Днем полив допустим при пасмурной погоде.
Объяснение:
procedure F(n: integer);
begin
if n>0 then begin
Write (n);
F(n-2);
F(n div 4);
end
end;
begin
F(9);
end.
На выходе будет 97531112
Если нужна трассировка, её можно сделать примерно так:
procedure F(n: integer);
begin
Writeln('Вход');
if n>0 then begin
Writeln ('В выходную строку: ',n);
Writeln('Вызов F(n-2)');
F(n-2);
Writeln('Вызов F(n div 4)');
F(n div 4);
end;
Writeln('Выход')
end;
begin
F(9);
end.
Результат трассировки:
Вход
В выходную строку: 9
Вызов F(n-2)
Вход
В выходную строку: 7
Вызов F(n-2)
Вход
В выходную строку: 5
Вызов F(n-2)
Вход
В выходную строку: 3
Вызов F(n-2)
Вход
В выходную строку: 1
Вызов F(n-2)
Вход
Выход
Вызов F(n div 4)
Вход
Выход
Выход
Вызов F(n div 4)
Вход
Выход
Выход
Вызов F(n div 4)
Вход
В выходную строку: 1
Вызов F(n-2)
Вход
Выход
Вызов F(n div 4)
Вход
Выход
Выход
Выход
Вызов F(n div 4)
Вход
В выходную строку: 1
Вызов F(n-2)
Вход
Выход
Вызов F(n div 4)
Вход
Выход
Выход
Выход
Вызов F(n div 4)
Вход
В выходную строку: 2
Вызов F(n-2)
Вход
Выход
Вызов F(n div 4)
Вход
Выход
Выход
Выход
