Pascal's triangle: Difference between revisions
Content added Content deleted
No edit summary |
|||
| Line 841: | Line 841: | ||
1 10 45 120 210 252 210 120 45 10 1 |
1 10 45 120 210 252 210 120 45 10 1 |
||
</lang> |
</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}}== |
=={{header|Python}}== |
||