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

Question

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

Гость

Ответ(ы) на вопрос:

Accepted Answer

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