Составить программу в паскалебез использования random

Question

Составить программу в паскале
без использования random

---

Answer 1

Const N= {количество спортсменок напишите}
var a: array[1..N] of real; k,i: integer; 
begin
writeln('Введите данные');
for i:=1 to n do readln(a[i]);
k:=0;
for i:=1 to N do
if (a[i]<57)and(a[i]>50) then k:=k+1;
if k=0 then writeln('Не найдено') else writeln(k);
readln
end.

---

Comments

У меня pascal ABC, всё работает

---

аналогично)

---

можно скрин?)

---

См. в решении

---

ввожу данные через пробел, нажимаю enter и ничего)

---

не знаю в чем дело

---

Вводи лучше через enter каждое значение

---

через пробел не пройдет здесь, так массив не заполнишь

---

спасибо большое, теперь все работает )

---

=)