Zelyubeva
6 год назад
Напишите плез программу)
sin(x)+sin(x^2)+...+sin(x^n)
x = 5
n = 20
ОТВЕТЫ
Иуст
Jul 20, 2019
Var x,xn,s:real; i,n:integer;
begin
x:=5; n:=20;
s:=0;
xn:=1;
for i:=1 to n do
begin
xn:=x*xn;
s:=s+sin(xn);
end;
writeln(s = ,s:5:3);
end.
Результат:
s = -3.826
begin
x:=5; n:=20;
s:=0;
xn:=1;
for i:=1 to n do
begin
xn:=x*xn;
s:=s+sin(xn);
end;
writeln(s = ,s:5:3);
end.
Результат:
s = -3.826
20
Смежные вопросы:
