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

В одномерном массиве х(15) найти Количество элементов, удовлетворяющих условию –0,5< sinxi ≤ 0, минимальный элемент.
Гость
Ответ(ы) на вопрос:
Гость
Var   X : array[1..15] of Real;   i : Byte; Begin n:=0; For i:=1 to 15 do Begin   Readln(X[i]);   If (sin(X[i])>-0.5) and (sin(X[i])<=0) then n:=n+1; end; Writeln(n); end.
Не нашли ответ?
Ответить на вопрос
Похожие вопросы