NOTATKI Z WYKŁADU

Andrzej:) · Gość

Function hania(x, i)
Hania=(1+x/i)^i
End function

1. IF THEN GOTO

I=1
F=0
E2:
F=F+hania(x, i)
If i=n then goto E1
I=I+1
Goto E2
E1:

2. DO... LOOP

I=1
F=0
Do
If I=n+1 then exit do
F=F+hania(x, i)
I=I+1
Loop

3. DO… UNTIL
I=1
F=0
Do until I>N
F=F+hania(x, I)
I=I+1
LOOP

4. DO... WHILE

I=1
F=0
Do while I<=N
F=F+hania (x, i)
I=I+1
Loop

5. FOR… NEXT

F+0
For I=1 to n
F=F+hania (x, I)
Next I

PROGRAMIK 1

Function hania(x, i)
Hania-=(1+x/i)^i
End Function

Sub pentla()
N=cells(1, 2)
X=cells(2, 2)
F=0
For I=1 to n
F=F+hania (x, I)
Next I
Cells(3, 3)=f
Info=f
Msgbox(info)
End sub