Запиши мантиссу числа и порядок числа 214=0,214⋅10^9
мантисса:
порядок:

! (

а)сумм(a5: b7)

б)срзнач(c4: c7)

я так понимаю нужно нарисовать рисунки рыб, карасей и различных животных. множества нужно перекрестить(множество рыб и хищ. животных), так как рыба тоже может быть хищником

var a: array [1..10] of real;

s,i: integer;

begin

  {vvod tablicy}

  for i : = 1 to 10 do

      if a[i]< > 0 then s: =s+1;

  writeln(s);

end.