mam pilne zadanie:
oszacowac zlozonosc podanych kodow z wyjasnieniem:
Function Pot(a : Integer; n : Byte) : LongInt;
Begin
If n=0 Then Pot:=1
Else Pot:=a*Pot(a, n-1);
End;
Function Fib(n : Byte) : LongInt;
Begin
If n<3 Then Fib:=1
Else Fib:=Fib(n-2)+Fib(n-1);
End;
Function Sil(n : Byte) : LongInt;
Begin
If n=0 Then Sil:=1
Else Sil:=n*Sil(n-1);
End;
Function Max(Var a : Tablica; start, stop : Word) : LongInt;
Var max_l, max_p : LongInt;
Begin
If start=stop Then Max:=a[start] Else
Begin
max_l:=Max(a, start, (start+stop) Div 2);
max_p:=Max(a, ((start+stop) Div 2)+1, stop);
If max_l>max_p Then Max:=max_l Else Max:=max_p;
End;
End;
kto pomoze i wyjasni? prosze tylko o powazne odpowiedzi, to dla mnie bardzo wazne, chodzi o te konkretne przyklady