Дан массив А целых чисел. Подсчитать в нём количество элементов, лежащих в диапазоне...

Question

Дан массив А целых чисел. Подсчитать в нём
количество элементов, лежащих в диапазоне [0,10].
Помогите пожалуйста.
Заранее благодарю!

Comments

размер массива?

---

не дано

---

5 минут

---

почему при запуске в паскале пустой чёрный экран?(

---

не знаю, попробуй убрать uses crt

---

скриншот покажи

---

http://radikal.ua/data/upload/6895e/c2184/3e81c16d8e.jpg

---

у тебя какой паскаль

Answer 1

Uses crt;const n =10;var k,b:byte;var a:array [1..n] of byte;beginb:=0;for k:=1 to n do beginread (a[k]); if (a[k]>-1) and  (a[k]<11) then b:=b+1;end;write(b);<span>end.