В одномерном массиве х(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.
Не нашли ответ?
Похожие вопросы