Решить на паскале. s=1/a+1/(a^2)+1/(a^4)++1/((a^2)^n)
Решить на паскале. s=1/a+1/(a^2)+1/(a^4)++1/((a^2)^n) если каждое действие обозначить как допустим a, то есть s=a1+a2+a3++an по какой формуле мы допустим из a2 получаем a3?
А3 получается из А2 так: А3=А2/(а*а). Это называется рекуррентная формула. Первое слагаемое здесь должно быть просто 1. В этом случае программа будет такой: var a,an,s:real; n,i:integer; begin write('a=');readln(a); write('n=');readln(n); an:=1; s:=1; for i:=1 to n do begin an:=an/(a*a); s:=s+an; end; writeln('s = ',s:8:5); end.
Первое слагаемое здесь должно быть просто 1. В этом случае программа будет такой:
var a,an,s:real; n,i:integer;
begin
write('a=');readln(a);
write('n=');readln(n);
an:=1; s:=1;
for i:=1 to n do
begin
an:=an/(a*a);
s:=s+an;
end;
writeln('s = ',s:8:5);
end.