Методика підрахунку прямокутників різної форми

str (speed,st);

bar (120,20,145,29);

outtextxy (120,20,st);

end;

end;

end;

#27: exit:=true;

#13: begin

shoot:=true;

setcolor (black);

line (33,195,33,185);circle (33,183,1);

circle (33,183,2);

setcolor (yellow);

line (33,195,37,190);

end;

' ': begin

shoot:=true;

setcolor (black);

line (33,195,33,185);

circle (33,183,1);

circle (33,183,2);

setcolor (yellow);

line (33,195,37,190);

end;

end;