Дан массив А, элементами которого являются n действительных чисел. Найти количество отрицательных элементов массива...

[ENTERPRISE2015]

Дан массив А, элементами которого являются n действительных чисел. Найти количество отрицательных элементов массива,
принадлежащих отрезку [100; -20].

Очень нужно кто знает помогите.. там ведь немного кода по идее

[Stilet]

Не много говоришь? Хм...

const n=1;
var a:array[1..n] of double; i,c:integer;
begin
 for i:=1 to n do begin a[i]:=random(n)/n-n; 
   if (a[i]<0) and (a[i]<=100) and (a[i]>=-20) then inc(c); write(a[i]:5:2);
 end;
 write('Отрицательных: ',c); readln;
end;

Так?

P.S. Только имей ввиду - Не копипастить!!!
Я написал так, как понял задание, но врядли я его понял правильно.
Поэтому разберись в коде а не беги преподу показывать.

[ENTERPRISE2015]

спс щас посмотрю что да как

это показывать через неделю гдето и не только показать а еще и защитить нужно... так что полюбому приходиться разбираться во всем

что значит эта запись random(n)/n-n; ? а именно n-n

[Аватар]

[100; -20]

Это что за отрезок такой? Ноу-хау?

[Stilet]

что значит эта запись random(n)/n-n; ? а именно n-n

n-n означает получение нуля. Только тебе-то зачем ноль делать, не пойму?

[ENTERPRISE2015]

ну ты ж так написал вот и спрашиваю

[Stilet]

ты ж так написал вот и спрашиваю

Я не так написал. Смотри внимательней: random(n)/n-n.
Тебе известно, что такое приоритет операторов? В книге по паскалю это есть - читай внимательнее.

[ENTERPRISE2015]

знаю.. така инфа в самом начале учебника почти

но я не понимаю что это такое random(n)/n-n.

сам рандом знаю.. генерирует случайное число

[Stilet]

Случайное число делится на n а после от этого отнимается n.
Это просто прикол, не более. Подставь туда что-то свое, или просто на readln() поменяй.

[ENTERPRISE2015]

тоесть деление на n и потом отнимание это все лишнее и его там не надо?