Паскаль.В одномерном массиве х(15) найти количество элементов, удовлетворяющих условию –0,5< sinxi ≤ 0, минимальный элемент. Полная программа!

Огромнейшее спасибо вам!!! Извините, я вообще просто не разбираюсь) Что должно происходить при запуске программы или какие вводить данные?

Вы должны ввести 15 чисел. После этого выводится количество искомых элементов и минимальный

Весьма странно...В задании нет никаких чисел(

Тогда не знаю

var x: array [1..15] of real; m: real; i,k: integer;begin for i := 1 to 15 do  read(x[i]); k := 0; m := x[1]; for i := 1 to 15 do  begin  if ( -0.5 < sin(x[i]) ) and ( sin(x[i]) <= 0 ) then   k := k + 1;  if x[i] < m then   m := x[i];  end; writeln('quantity: ',k); writeln('min: ',m)end.