witam, mam problem mam problem nie potrafie rozwiązać tego zadania prosze o pomoc. bo sie totalnie w tym nie kapuje. i jak najszybszą pomoc.
"skonstruować fukcje suma o argumencie n typu longint i wyniku typu double obliczając sume."
S(n)=1-(1/3(do 4 potegi))+(1/5(do 4 potegi)-(1/7(do 4 potegi))+....+ (-1)(do n+1 potegi)/2n-1(do 4 potegi)
Prosze o pilną pomoc
Powiedz, czego nie umiesz zrobić lub idź do działu Praca.
nie potrafie skonstruować fukcji żeby liczyła sume zmienej n
Suma od 1 do n, gdzie elementem jest (-1)(do n+1 potegi)/2n-1(do 4 potegi)?, bo coś skróciłes zadanko, albo pierwsze elementy dla n= 1 sie nie zgadzają...
To albo pętelka, albo rekurencja...
Dobrze wstawiam zdjecie zadania. Prosze o pomoc. i tylko prostym jezykiem prosze bo jestem z tego całkowicie tempy. to jest zadanie 1. mam napisać program który bedzie liczył zmienna n
Ma ktoś jakiś pomysl na to?
jestem z tego całkowicie tempy.
Nikt nie pisze gotowców (prawie?), musisz udowodnić że coś wiesz, a jak sam przyznajesz nie wiesz nic. Więc ogarnij podstawy, wtedy to zalicz ew. przyjdź tutaj to pomożemy jak nie będziesz czegoś konkretnego rozumieć a nie wszystkiego.
procedure TForm1.PrzeliczClick(Sender: TObject);
var
n,x:Integer;
s:Double;
begin
n:=SpinEdit1.Value;
for x:=1 to n do
s:=s+(1/sqr(sqr(2*x-1)));
Wynik.Caption:= ('Wynik= ') +FloatToStr(s);
end;
end.
do czegoś takiego doszedłem nie wiem czy dobrze.
Czy mógłby ktoś powiedzieć czy dobrze rozumumuje?
var s,s1,n:double;
begin
s:=1; n:=3;
repeat
s1:=s;
s := s - 1/sqr(sqr(n)) + 1/sqr(sqr(n+2));
n := n + 4;
until s = s1;
writeln(s)
end.