Textcolor(colr); gotoxy (2,1); . Writer ••’); for i:=3 to (x2-xl-l) do


Begin



.