[Pascal] Petlja for...
Poslato: Nedelja, 02. Novembar 2014, 12:06
Zadatak glasi:
[dispmath]S=\sum_{k=1}^n\frac{(x-3)^k}{k^n}[/dispmath]
Treba napisati program koji za ceo broj [inlmath]n[/inlmath] i broj [inlmath]x[/inlmath] izračunava [inlmath]S[/inlmath].
Imam rešenje i ono ovako glasi:
Ako bi mogao neko da objasni ovu drugu petlju, ne razumem je. On nam omogućava da ispod razlomačke crte piše kod prvog razlomka [inlmath]1^n[/inlmath], kod drugog [inlmath]2^n[/inlmath] do [inlmath]n^n[/inlmath].
Ali mi ovaj kod nije jasan kako on to radi, kad ne postoji funkcija za stepenovanje (osim za kvadriranje i funkcije [inlmath]e^x[/inlmath]).
[dispmath]S=\sum_{k=1}^n\frac{(x-3)^k}{k^n}[/dispmath]
Treba napisati program koji za ceo broj [inlmath]n[/inlmath] i broj [inlmath]x[/inlmath] izračunava [inlmath]S[/inlmath].
Imam rešenje i ono ovako glasi:
- Kôd: Obeleži sve
program suma;
Var i,j,n:inteeger;
x,s:real;
p:longint;
Begin
readln(n);
readln(x);
s:=0;
k:=1;
for i:=1 to n do begin
k:=k*(x-3);
p:=1;
for j:==1 to n do p:=p*i;
s:=s+k/p;
end;
writeln(s:10:6);end.
Ako bi mogao neko da objasni ovu drugu petlju, ne razumem je. On nam omogućava da ispod razlomačke crte piše kod prvog razlomka [inlmath]1^n[/inlmath], kod drugog [inlmath]2^n[/inlmath] do [inlmath]n^n[/inlmath].
Ali mi ovaj kod nije jasan kako on to radi, kad ne postoji funkcija za stepenovanje (osim za kvadriranje i funkcije [inlmath]e^x[/inlmath]).