🚀 go-pugleaf

On Mon, 13 Apr 2009 00:01:16 -0700 (PDT), bala_dżi wrote:
> <ciach>
> for i:=1 to 20 do
> begin
>  if (abs (x[i+1]-x[i])+ abs (y[i+1]-y[i])) > r*2 then
>  circle (x[i],y[i],r);
> end;
> <ciach>
> Ale to nie to, dla dwóch kółek to działa nie moge wpasc na to jak
> sprawdzic zeby się nie przecinało ze wszystkimi.

Bo sprawdzasz tylko odległości każdych dwóch kolejnych
okręgów, a musisz sprawdzać dla każdego sąsiedztwo 
z każdym innymi.

Najprosciej przy dodawaniu od razu sprawdzać czy
miejscówka nowo dodawanego jest legalna, jeżeli nie,
pomijać dodanie do kolekcji i losować nowe koordynaty.

btw:
> for i:=1 to 20 do
> begin
>   x[i]:=random(320);
>   y[i]:=random(200);
> end;

Czy aby napewno okręgi mogą ,,wystawać" poza założony
obszar?

-- 
Pozdrawiam,
Łukasz 'Maly' Ostrowski.      http://maly.nemo.pl/
ICQ: 148498663     GG: 2544385      AIM: malyzgora
GTalk: l3vi4than@gmail.com        ASTRA: L3viathan