RosettaCodeData/Task/Pascals-triangle/Yabasic/pascals-triangle.basic

10 lines
129 B
Plaintext

input "Number of rows? " r
for i = 0 to r-1
c = 1
for k = 0 to i
print c using "####";
c = c*(i-k)/(k+1)
next
print
next