Круговорот воды в природе-процесс циклического перемещения воды в земной биосфере. Состоит из испарения воды, переноса паров воздушными течениями, их конденсации, атмосферных осадков и переноса воды в реках и других водоёмах. Большая часть воды испаряется с поверхности мирового океана.
Моря теряют из-за испарения больше воды, чем получают с осадками, на суше — положение обратное. Вода непрерывно циркулирует на земном шаре, при этом её общее количество остаётся неизменным.
Три четверти поверхности земного шара покрыты водой. Водную оболочку Земли называют гидросферой. Большую её часть составляет соленая вода морей и океанов, а меньшую-пресная вода озер, рек, ледников, грунтовые воды и водяной пар.На земле вода существует в трех агрегатных состояниях: жидком, твердом и газообразном. Без воды невозможно существование организмов. В любом организме вода является средой, в которой происходят химические реакции, без которых не могут жить организмы. Вода является самым ценным и самым необходимым веществом для жизнедеятельности живых организмов.Постоянный обмен влагой между гидросферой, атмосферой и земной поверхностью, состоящий из процессов испарения, передвижения водяного пара в атмосфере, его конденсации в атмосфере, выпадения осадков и стока, получил название круговорота воды в природе. Атмосферные осадки частично испаряются, частично образуют временные и постоянные водоемы, частично-просачиваются в землю и образуют подземные воды.
var i, j, e, max, min: integer; F: array[1..k, 1..p] of integer;
begin Randomize; writeln('Исходная матрица'); max := -32768; min := 32767; for i := 1 to k do begin for j := 1 to p do begin e := random(100) - 50; if e > max then max := e else if e < min then min := e; write(e:4); F[i, j] := e end; writeln end; F[1, p] := max; F[k, 1] := min; writeln('Результирующая матрица'); for i := 1 to k do begin for j := 1 to p do write(F[i, j]:4); writeln end end.
Моря теряют из-за испарения больше воды, чем получают с осадками, на суше — положение обратное. Вода непрерывно циркулирует на земном шаре, при этом её общее количество остаётся неизменным.
Три четверти поверхности земного шара покрыты водой. Водную оболочку Земли называют гидросферой. Большую её часть составляет соленая вода морей и океанов, а меньшую-пресная вода озер, рек, ледников, грунтовые воды и водяной пар.На земле вода существует в трех агрегатных состояниях: жидком, твердом и газообразном. Без воды невозможно существование организмов. В любом организме вода является средой, в которой происходят химические реакции, без которых не могут жить организмы. Вода является самым ценным и самым необходимым веществом для жизнедеятельности живых организмов.Постоянный обмен влагой между гидросферой, атмосферой и земной поверхностью, состоящий из процессов испарения, передвижения водяного пара в атмосфере, его конденсации в атмосфере, выпадения осадков и стока, получил название круговорота воды в природе. Атмосферные осадки частично испаряются, частично образуют временные и постоянные водоемы, частично-просачиваются в землю и образуют подземные воды.
k = 7;
p = 10;
var
i, j, e, max, min: integer;
F: array[1..k, 1..p] of integer;
begin
Randomize;
writeln('Исходная матрица');
max := -32768;
min := 32767;
for i := 1 to k do
begin
for j := 1 to p do
begin
e := random(100) - 50;
if e > max then max := e
else if e < min then min := e;
write(e:4);
F[i, j] := e
end;
writeln
end;
F[1, p] := max;
F[k, 1] := min;
writeln('Результирующая матрица');
for i := 1 to k do
begin
for j := 1 to p do
write(F[i, j]:4);
writeln
end
end.
Тестовое решение:
Исходная матрица
34 36 41 9 -4 39 29 1 15 -33
13 -9 -29 28 -45 -1 8 38 37 12
-33 45 3 35 -47 -14 -30 49 -29 -6
-50 -49 42 15 46 4 24 -21 -10 23
-14 30 -14 -46 33 -26 24 2 -3 -31
-27 15 47 25 -43 39 -17 -44 6 -40
19 30 -20 -29 -34 12 -2 5 32 0
Результирующая матрица
34 36 41 9 -4 39 29 1 15 49
13 -9 -29 28 -45 -1 8 38 37 12
-33 45 3 35 -47 -14 -30 49 -29 -6
-50 -49 42 15 46 4 24 -21 -10 23
-14 30 -14 -46 33 -26 24 2 -3 -31
-27 15 47 25 -43 39 -17 -44 6 -40
-50 30 -20 -29 -34 12 -2 5 32 0