var n,i:comp;a:string;begin read(n);for i:=1-n to n-1do begin str(a+'*':n-abs(i)-1,a);writeln(a+'*':n,a)end;end.
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page