Вычислить y=cosx+cosx^2+cosx^3+...+cosx^n
10-11 класс
|
var
x,s:real;
n,i:integer;
begin
write('Введите n и x: ');
readln(n,x);
for i:=1 to n do s:=s+cos(power(x,i));
writeln('y=',s)
end.
в квадрат возводится х, или весь косинус?
Другие вопросы из категории
1.распечатать.
2. переставить 2 и 3 строки.
3. подсчитать в каждой строке количество положительных элементов
4.найти сумму в 3 столбце.
в лазарусе /делфи сделать в калькуляторе :
arcsin
arccos
arctg
arcctg
n!
%
Читайте также
Организовать меню: 1) вычислить значение y=sinx 2) y=cosx 3) выход
выражение
2. Составить линейную логическую программу, печатающую значение 1, если указанное высказывание является истинным, и 0 – в противном случае: данное четырехзначное число читается одинаково слева направо и справа налево.
прогрессии и сумму первых n членов Sn. Если Sn≤25, то вычислить процентное отношение первого и последнего членов арифметической прогрессии . Написать программу на языке Паскаль
нужно использовать кнопку СРЗНАЧ,но ведь там в баллах и выходит,а "средний бал" помоему должен вычисляться в оценке.