Rosetta Code

Pascal's triangle: Difference between revisions

Page Discussion

Pascal's triangle (view source)

Revision as of 02:50, 22 May 2011

111 bytes added ,  13 years ago
→‎{{header|Icon}} and {{header|Unicon}}: fix
Line 726:
END</lang>
=={{header|Icon}} and {{header|Unicon}}==
The code below is slightly modifedmodified from the library version of pascal which prints 0's to the full width of the carpet.
<lang Icon>link math
 
procedure main(A)
every n := !A do { # for each command line argument
pascal( n := integer(\A[1]n) | &null)
pascal(n)
}
end
 
Line 747 ⟶ 750:
[http://www.cs.arizona.edu/icon/library/src/procs/pascal.icn math provides the original version of pascal]
 
Sample output:<pre></pre>width=4 height=4
1
1 1
1 2 1
1 3 3 1</pre>
 
=={{header|IDL}}==
Anonymous user
Retrieved from "https://rosettacode.org/wiki/Special:MobileDiff/74857"