... line(5 ,-2 30,0 ,-2 40 ); line(310 ,-5 ,320,0); line(310,5,320,0); line(228 ,-2 35, 240 ,-2 40 ); line(235 ,-2 28, 240 ,-2 40 ); setlinestyle(1,0,0); line (-3 20,0,0,0); line(0,0, 240 ,-2 40 ); line(0,0,0, 240 ); ... setcolor( 14) ; setviewport(getmaxX div 2,getmaxY div 2,getmaxX,getmaxY,false); setlinestyle(0,0,0); line(0,0,320,0); line (-0 ,0,0 ,-2 40 ); line(0,0 ,-2 40 , 240 ); line (-5 ,-2 30,0 ,-2 40 ); line(5 ,-2 30,0 ,-2 40 ); ... Begin for i:=j to l do Begin xi[i,j]:=(1-u)*xi[i-1,j-1]+u*xi[i,j-1]; yi[i,j]:=(1-u)*yi[i-1,j-1]+u*yi[i,j-1]; zi[i,j]:=(1-u)*zi[i-1,j-1]+u*zi[i,j-1]; End; End; put_pixel(round(xi[i,j]),round(yi[i,j]),round(zi[i,j]),WHITE);...