Програмування і алгоритмічні мови
delay(100);}
for(x1,y1,y2;y1<=255;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(0);
setlinestyle(0,0,1);
for(I=0;I<10;I++)
{line(496,300-I,619-I*11.5,300-I); //вода 2 стала
delay(0);} }
if(k1>9)
{
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<7;I++)