
Лишин
6 год назад
Задание для языка Free Pascal:Вычислить значение суммы ряда Y(X) в произвольной точке х , если Y(x) = sinx + sin^2(x) + sin^3(x) + ... + sin^n(x)Величину х вводитьВыполнить вычисления для 5,10,15 и 20 слагаемых
ОТВЕТЫ

Keller Alexandra
Oct 24, 2020
var x,y,p:real; n,i:integer;
begin
write('x = ');
readln(x);
write('n = ');
readln(n);
p:=1;
for i:=1 to n do
begin
p:=p*sin(x);
y:=y+p;
end;
writeln('y = ',y:6:4);
end.
Пример:
x = 1.5
n = 5
y = 4.9626
begin
write('x = ');
readln(x);
write('n = ');
readln(n);
p:=1;
for i:=1 to n do
begin
p:=p*sin(x);
y:=y+p;
end;
writeln('y = ',y:6:4);
end.
Пример:
x = 1.5
n = 5
y = 4.9626
607
Смежные вопросы: