Anonymous user
Pascal's triangle: Difference between revisions
no edit summary
No edit summary |
|||
Line 841:
1 10 45 120 210 252 210 120 45 10 1
</lang>
=={{header|Purebasic}}==
<lang Purebasic>
Procedure pascaltriangle( n.i)
For i= 0 To n
c = 1
For k=0 To i
Print(Str( c)+" ")
c = c * (i-k)/(k+1);
Next ;k
PrintN(" "); nächste zeile
Next ;i
EndProcedure
OpenConsole()
Parameter.i = Val(ProgramParameter(0))
pascaltriangle(Parameter);
Input()</lang>
=={{header|Python}}==
| |||