1
2
3
4
5
6
(define (fatorial n)
(if (= n 0) 1 
(* n (fatorial (- n 1)))))
 
 
(write (fatorial 5))

1
2
3
4
5
6
7
8
(define (fatorial n p)
    (if (= n 0)1
        (* n (fatorial (- n 1)))
    (if (= p 0)1
        (* p (fatorial (- p 1)))
    (/ n(/ (- n p))))
 
(write (fatorial 4 2))

1
2
3
4
5
6
7
8
9
(define(fatorial n)
   (if (= n 0) 1
       (* n (fatorial(- n 1)))))
 
(define (comb n p)
   ((/ (fatorial n) (* (fatorial p) (fatorial(- n p))))))
 
 
(write (comb 4 2))

1
2
3
4
5
6
7
(define (fatorial n)
        (if (= n 0) 1 (* n (fatorial (- n 1)))))
(define (arranjo n p)   (fatorial n 
                                (/ (* (- n p) (fatorial)))))
 
 
(write (arranjo 5 4))

1
2
3
4
5
6
7
8
9
(define (fatorial n )
(if (= n 0 ) 1
(* n (fatorial (- n 1)))))
 
(define (arranjo n p)
 (/ (fatorial n) (fatorial(- n p))))
 
 
(write(arranjo 5 2))

1
2
3
define(comb n)
        (if( = n 0) 1
                (* n(comb(-n 1)))))

1
2
3
4
5
6
(define (fatorial n)
(if (=n0) 1 
(*n (fatorial (-n1)))))
 
 
(write (fatorial 5))

1
2
3
4
5
(define (fatorial n)
        (if (= n 0) 1
                (* n (fatorial(- n 1)))))
 
(write fatorial(5))

1
2
3
4
5
6
7
8
9
(define (fatorial n )
(if (= n 0 ) 1
(* n (fatorial (- n 1)))))
 
(define (arranjo n p)
 (/ (fatorial n) (fatorial(- n p))))
 
(write(fatorial 5))
(write(arranjo 5 2))

1
2
3
4
5
6
7
(define (fatorial n)
        (if (= n 0) 1 (* n (fatorial (- n 1)))))
 
(define (comb n p)
        (/ (fatorial n) (* (fatorial p) (fatorial (- n p)))))
 
(write (comb 4 2))

1
2
3
4
5
(define(comb n)
        (if( = n 0) 1
                (* n(comb(-n 1))))
 
write(comb(5))

1
2
3
4
5
(define(fatorial n)
 (if (= n  0) 1
  (* n (fatorial(- n 1)))))
 
(write (fatorial 5 ))

1
2
3
4
( define (fatorial n)
        (if ( = n 0) 1
                ( * n (fatorial (- n 1)))))
(write (fatorial 4))

1
2
3
4
5
6
7
8
9
(define (fatorial n)
        (if (= n 0) 1 (* n (fatorial (- n 1)))))
 
(define (comb n p)
        (/ (fatorial n) (* (fatorial p) (fatorial (- n p))))) 
 
(define (arranjo n p)
        (/ (fatorial n) (fatorial (- n p))))
 

1
2
3
4
( define (fatorial n)
        (if ( = n 0) 1
                ( * n (fatorial (- n 1)))))
(write (fatorial 2))

1
2
3
4
5
6
7
8
9
(define (fatorial n )
(if (= n 0 ) 1
(* n (fatorial (- n 1)))))
 
(define (arranjo n p)
 (/ (fatorial n) fatorial(- n p)))
 
(write(fatorial 5))
(write(arranjo 5 2))

1
2
3
(define(comb n)
        (if( = n 0) 1
                (* n(comb(-n 1))))

1
2
3
4
5
6
7
8
(define(fatorial n)
     (if(= n 0)1
        (* n (fatorial(- n 1)))))
 
(write(fatorial 5))
 
(define(comb n p))
     (fatorial n )/ (fatorial(p) * fatorial(- n p) ) 

1
2
3
4
5
6
7
8
9
(define(fatorial n)
   (if (= n 0) 1
       (* n (fatorial(- n 1)))))
 
(define (comb n p)
   ((/ (fatorial n) (* (fatorial p) (- (fatorial n) (fatorial p))))))
 
 
(write (comb 4 2))

1
2
3
4
5
6
7
8
9
(define (fatorial n )
(if (= n 0 ) 1
(* n (fatorial (- n 1)))))
 
(define (arranjo n p)
 (/ (fatorial n) fatorial(- n p))
 
(write(fatorial 5))
(write(arranjo 5 2))

1
2
3
4
( define (fatorial n)
        (if ( = n 0) 1
                ( * n (fatorial (- n 1)))))
(write (farotial 2))

1
2
3
4
5
6
7
8
9
(define (fatorial n )
(if (= n 0 ) 1
(* n (fatorial (- n 1)))))
 
(define (arranjo n p)
 (/ fatorial n fatorial(- n p)))
 
(write(fatorial 5))
(write(arranjo 5 2))

1
2
3
4
5
6
7
8
9
(define(fatorial n)
   (if (= n 0) 1
       (* n (fatorial(- n 1)))))
 
(define (comb n p)
   (if (/ (fatorial n) (* (fatorial p) (- (fatorial n) (fatorial p))))))
 
 
(write (comb 4 2))

1
2
3
4
5
6
7
8
9
(define (fatorial n )
(if (= n 0 ) 1
(* n (fatorial (- n 1)))))
 
(define (arranjo n p)
 (/ fatorial n fatorial(- n p))
 
(write(fatorial 5))
(write(arranjo 5 2))

1
2
3
4
5
6
7
(define (fatorial n)
        (if (= n 0) 1 (* n (fatorial (- n 1)))))
 
(define (comb n p)
        (/ (fatorial n) (* (fatorial p) (fatorial (- n p))))) 
 
(write (comb 6 2))

1
2
3
4
5
6
7
(define (fatorial n)
        (if (= n 0) 1 (* n (fatorial (- n 1)))))
 
(define (comb n p)
        (/ (fatorial n) (* (fatorial p) (fatorial (- n p)))))
 
(write (comb 20 3))

1
2
3
4
( define (fatorial n)
        (if (=n 0) 1
                (* n (fatorial (- n 1)))))
(write (fatorial 2))

1
2
3
4
5
6
(define (fatorial n)
(if (=n0) 1 
(*n(fatorial (-n1)))))
 
 
(write (fatorial 5))

1
2
3
4
5
6
7
(define (fatorial n)
        (if (= n 0) 1 (* n (fatorial (- n 1)))))
 
(define (comb n p)
        (/ (fatorial n (* (fatorial p) (fatorial (- n p))))))
 
(write (comb 20 3))

1
2
3
4
5
6
7
(define (fatorial n)
        (if (= n 0) 1 (* n (fatorial (- n 1)))))
 
(define (bomb n p)
        (/ (fatorial n (* (fatorial p) (fatorial (- n p))))))
 
(write (comb 20 3))