7 лет назад
Дан массив из N действительных чисел. Подсчитать .сколько в нем отрицательных, положительных и нулевых элементов.
Нужно само тело программы
Только авторизированные пользователи могут оставлять свои ответы
Дата
Популярность
Язык программирования?
>Нужно само тело программы
FillChar(#0, c, SizeOf(c));
for i:=1 to n do inc(c[sign(a[i])]);
Writeln(c[-1], c[0], c[1]));
Помогло?