+
1
|
list
|
skin
|
login
|
editor
α-wwwiki
::
workplace
user:none
(531 bytes)
_h1 pascal {pre {define pascal (n p) °° function pasc (n,p) { return (n==1 || p==0)? 1 : n*pasc(n-1,p-1)/p; } return pasc(n,p); °°} {define pascal_line (m) °° var str = ''; for (var i=0; (i< m || i==m); i++) str += '{pascal ' + m + ' ' + i + '}.'; str = str.substring(0,str.length-1); return str; °°} {define pascals (m) °° var str = ''; for (var i=0; (i< m); i++) str += i + ': {pascal_line ' + i + '} {br}'; return str; °°} {pascals 16} }