przemko icon

Arytmetyka -- tablicowanie wyników

przemko | PRO | 06/12/17 07:02:42 PM UTC | 0 ⭐ | 7602 👁️ | Never ⏰ | []
Prolog |

320 B

|

None

|

0 👍

/

0 👎

Raw Download Clone Embed Print View 
% fib.pl
 
:- dynamic fib/2.
 
fib(0, 0).
fib(1, 1).
fib(N, F) :-
    N > 1, 
    N1 is N - 1, 
    N2 is N - 2,
    fib(N1, F1), 
    fib(N2, F2),
    F is F1 + F2,
    asserta(fib(N, F)).
 
fib(0).
fib(1).
fib(X) :-
    fib(0, 1, X).
 
fib(A, B, X) :-
    S is A + B,
    (   X = S
    ;   fib(B, S, X)).

Comments

  • icon
    01/01/70 12:00:00 AM UTC
    Plain Text |

    0 B

    |

    👍

    /

    👎

    
    
    

    

            
    • 
            
            
  • 
                
    
                    
    
                        Suikzau icon
                    
    
                    
    
                        
                        Suikzau
                        
                        
                    
    
                    
    
                        
                        03/31/26 10:06:44 PM UTC
                        
                    
    
                
    
                

    
    
    
        
    
            text
            |
            
    0 B
    
            
            |
            
    0 👍
    
            /
            
    0 👎
    
        
    
        
        
    
            
            
            
    
                
                Raw
                
                Download
                
                Clone
                
                Embed
                
                Print
                
                View
                
            
    
            
        
    
        
    
    
    
    
        
    Best t33n active cpx link daily updates!
 Copy and paste the link in a new browser tab and then hit enter!
 https://crazyporn.@xxx/members/157354/?asgtbndr=1&play=true&spon=adworld&zone=400
 Remove the @ 
    
    
    

    

            
    • 
            
            
  • 
                
    
                    
    
                        Zyubi icon
                    
    
                    
    
                        
                        Zyubi
                        
                        
                    
    
                    
    
                        
                        04/05/26 02:31:56 AM UTC
                        
                    
    
                
    
                

    
    
    
        
    
            text
            |
            
    0 B
    
            
            |
            
    0 👍
    
            /
            
    0 👎
    
        
    
        
        
    
            
            
            
    
                
                Raw
                
                Download
                
                Clone
                
                Embed
                
                Print
                
                View
                
            
    
            
        
    
        
    
    
    
    
        
    Best t33n active cpx link daily updates!
 Copy and paste the link in a new browser tab and then hit enter!
 https://crazyporn.xxx/members/157354/?asgtbndr=1&play=true&spon=adworld&zone=400
    
    
    

    

            
    • 
            
            
  • 
                
    
                    
    
                         icon
                    
    
                    
    
                        
                        
                        
                    
    
                    
    
                        
                        01/01/70 12:00:00 AM UTC
                        
                    
    
                
    
                

    
    
    
        
    
            Plain Text
            |
            
    0 B
    
            
            |
            
     👍
    
            /
            
     👎
    
        
    
        
    
    
    
    
        
    
    
    

    

            
    •