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

Question

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

Comments

в паскале могу бы написать, но в дельфи не шарю.

---

ок можете написать в паскале программу?

Answer 1

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