# Pascal's triangle - Il triangolo di Pascal (o di Tartaglia)
n <- 6
for(k in 0:n) { cat("C(",k,",0..",k,"): ",sep=""); for(h in 0:k) cat(choose(k,h), " "); cat("\n") }
# C(0,0..0): 1  
# C(1,0..1): 1  1  
# C(2,0..2): 1  2  1  
# C(3,0..3): 1  3  3   1  
# C(4,0..4): 1  4  6   4   1  
# C(5,0..5): 1  5  10  10  5   1  
# C(6,0..6): 1  6  15  20  15  6  1