вычислить сумму положительных и сумму отрицательных значений функции z=cos(nx+a)sin(nx-a), где n=1,2,...10
10-11 класс
|
Надеюсь мое решение правильное, просто не знал что делать с переменными a и x
Program Pr1;
uses crt;
var n,z,x,a,s1,s2:real;
Begin
clrscr;
readln(x,a);
z:=1;
n:=1;
s1:=0;
s2:=0;
while n<=10 do begin
z:=cos(n*x+a)*sin(n*x-a);
if z>0 then s1:=s1+z
else s2:=s2+z;
n:=n+1;
end;
writeln('+ ',s1:8:3,' - ',s2:8:3);
end.
Другие вопросы из категории
sin(0,1x) для х больше равно 0. Построить график полученной функции. Спасибо заранее
Если A^2 < B^2,вычисления закончить если A^2=B^2(отпечатать текст "A^2=B^2") если A^2 >B^2 , вычислить значение функции Y=sinx+0,12 где x изменяется на интервале от 1 до 3
с шагом 0.2.Подсчитать и отпечатать количество отрицательных значений функции.
Читайте также
среди 10 элементов вещественного массива
3)заполнить массив из n целых чисел.выяснить какое число встречается раньше-положительное или отрицательное.
4)в целочисленном массиве есть отрицательные элементы.вывести номера этих элементов
массива
3)заполнить массив из n целых чисел.выяснить какое число встречается раньше-положительное или отрицательное.
4)в целочисленном массиве есть отрицательные элементы.вывести номера этих элементов
б) вычисления значения функции х = 12а2 + 7а — 16 при любом значении а.
2.
даны катеты прямоугольного треугольника. Найти его гипотенузу
n>2. чему равно значение функции F(6)?
2. написать программу, вычисляющую значение функции (y=f(x))
y=x-2, если x>0,
y=0, если x=0,
y=x*x, если x<0