Водоросли являются группой, в которой относились предшественники наземных растений, способ питания растительный благодаря фотосинтезу, их клетки имеют хлоропласты, но у многоклеточных водорослей значительно проще строение: отсутствуют ткани и нет разделения тела на органы - листья, стебли, корни.
var mas: array [1..5, 1..6] of integer; mas_od: array[1..6] of integer; i, j: integer;
begin randomize; for i := 1 to 5 do for j := 1 to 6 do mas[i, j] := random(10)-5;
for i := 1 to 5 do begin for j := 1 to 6 do write(mas[i, j]:4); writeln; end; writeln(''); for i := 1 to 5 do begin mas_od[i] := 1; for j := 1 to 6 do begin if((mas [i, j] mod 2 = 0) and (mas[i, j] > 0)) then mas_od[i] := mas_od[i] * mas[i, j]; end; end; for i:=1 to 6 do write(mas_od[i]:4); writeln; end.
