do input""a if 0^a+a<2?"◇" if a>1?"/";:for i=3to a*2?"-";next:?"\\":for j=2to a for k=2to j?" ";next:?"\\";:for m=1to(a-j)*2?" ";next:?"/"next loop