Програмування і алгоритмічні мови

line(190,125,190,146);

lin(y1);

lin1(y12);

setcolor(2);

line(495,288,620,300);

line(495,308,620,308);

setcolor(2);

zasyvka(x1,y1,y2);

zasyvka1(x12,y12,y23);

line(195,244,445,270);

line(195,278,445,278);

setcolor(2);

rectangle(10,50,620,450);

setfillstyle(1,1);floodfill(610,339,2);

setfillstyle(9,6);floodfill(610,439,2);

if(k1<=7)

{

setcolor(1);

setlinestyle(0,0,1);

for(I=0;I<7;I++)

{line(11,237-I,144,237-I);delay(0);} //вода 3

setcolor(1);

setlinestyle(0,0,1);

for(I=0;I<13;I++)

{line(11,230-I,144-I*10.5,230-I);delay(0);} //вода 3