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

setfillstyle(1,12);floodfill(480,190,10);

for(x1,y1,y2;y1>212;y1--,y2--)

{

setcolor(2);

zasyvka(x1,y1,y2);

lin(y1);

delay(100);

setcolor(0);

line(485,y1+1,495,y1+1);

line(485,y2+1,495,y2+1);

setcolor(1);

line(485,y2+1,495,y2+1);

}

setcolor(0);

for(I=24;I>0;I--)

{line(196,270-I,444-I*10.5,270-I); //вода 2 стала

delay(100);}

setcolor(1);

setlinestyle(0,0,1);

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

{line(496,307-I,619,307-I);delay(0);}

setcolor(1);

setlinestyle(0,0,1);

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

{line(496,300-I,619-I*11.5,300-I); //вода 2 стала