RosettaCodeData/Task/Pascals-triangle/FunL/pascals-triangle-3.funl

12 lines
277 B
Text
Raw Permalink Normal View History

2016-12-05 23:44:36 +01:00
def triangle( height ) =
width = max( map(a -> a.toString().length(), pascal(height)) )
if 2|width
width++
for n <- 1..height
print( ' '*((width + 1)\2)*(height - n) )
println( map(a -> format('%' + width + 'd ', a), pascal(n)).mkString() )
triangle( 10 )