Опубликовано 09.06.2017 по предмету Информатика от Гость >> <<

Помогите пожалуйста! Дан одномерный массив с действительными числами. Найти количество отрицательных элементов. Нужно написать программу в Delphi, Pascal

Ответ оставил Гость

В делфи и в паскале одно и то же.
Допустим, вы уже считали массив
a - массив (нумерация с 1), n - его длинна
for i := 1 to n do begin
  if a[i] < 0 then count := count + 1;
end;