Christmas tree by uru

var i,n:word;s:string="*
";begin
read(n);repeat
write(s:n+i);s:="**"+s;inc(i)until i=n-1;write("*":i)end.

Note that non-ascii characters in the above source code will be escaped (such as \x9f).

download

return to the top page