Дан массив из 20 элементов вводиться с клавиатуры , подсчитать количество отрицательных элементов

Var     i,n: integer;     a: array[1..20]of integer; begin for i: =1 to 20 do   begin   readln(a[i]);   if a[i]< 0 then n: =n+1   end; writeln('ответ: ',n) end.

А)свойства, действия, поведение, состояние б) отвечают на вопрос: "чем может отличаться один объект от другого? " "что может изменится у объекта при выполнении действия? ! в) отвечают на вопрос: "что он может делать? " (активное действие) или "что с ним можно делать? " (пассивное действие) г) имена действий, пошаговое составление описания каждого действия свойственного объекту. д) человек называет или подразумевает определённое сочетание значений всех или некоторых свойств этого объекта                                                                             может так?

Наверно в опечатка - работая с одним и тем же учебником, получает разное количество информации. наверно так должно быть. ответ: необходимо различать понятия информация и информативность.  ·  например         содержит ли информацию учебник информатики 11  класс? (да).  ·                для кого он будет информативным - для ученика 11 класса, 8 или  1 класса? (для ученика 11 класса он будет информативным, так как в нем содержится новая и понятная ему информация, а для ученика 1 и 8    класса она информативной не будет, так как информация для него непонятна.)