this is a message in mime format!

--1446804755=20030620125757=1103733514
Content-Type: text/plain; charset="us-ascii"
Content-Transfer-Encoding: 7bit

hello CoDeR!

> XP alatt a Clipper 100% kihasználja a processzort, mást alig lehet csinálni.
szvsz nem 'engedi el' a cpu-t.. probald meg, hogy beteszel egy kis
asm blokkot (sti hlt) a billentyuleutesre varakozo ciklusodba...
csodakat kell, hogy muveljen....;)

mc36
--1446804755=20030620125757=1103733514--

HC> Sziasztok!

HC> A kovetkezo problemaban kernem segitsegeteket: van egy jooo nagy n*2-es
HC> tombom, sorai egy bezart gorbe egymas utan kovetkezo koordinatapontjait
HC> tartalmazzak. Cel: feltolteni a gorbe altal bezart teruletet. Magaval a
HC> rekurzioval nem is lenne gondom, DE: hogyan tudom eldonteni a KEZDO
HC> pixelt? Hogyan tudom eldonteni egy pixelrol, hogy az alakzaton belul
HC> van-e? Atturtam a netet valami forrasert, de semmi. Ha valakinek lenne
HC> otlete vagy joo kis kodreszlete, neadj'Isten pacalban vagy vb-ben, akkor
HC> legyen olyan szives es ossza meg velem, lehetoleg egy cc-ben is
HC> surgosseg miatt...

HC> elore is koszi,
HC> petya

HC> ____________________________________________________________________
HC> Gra'tzer Pe'ter    (30)-982-58-51  ICQ14863157


Hello petya!

Egy  fontos  adatot kihagytal! Az a bizonyos gorbe konvex vagy konkav?
Megoldas  egy  konvex  gorbere:  (a  szintaktikai  hibakert  bocsi, de
rogtonzok)

pixel.x   es  pixel.y  az  a  pont  korodinatai,  amelyet  le  akarunk
ellenorizni, hogy a gorben belul van -e.


k:=0;
for i:=1 to N do
  begin
    if tomb[i].x=pixel.x then
      begin
        ellenor[k]:=tomb[i].y;
        inc(k);
        if k=2 then break;
      end;
  end;

if ellenor[1]<ellenor[2] then
  begin
    y1:=ellenor[1];
    y2=ellenor[2];
  end
else
  begin
    y1:=ellenor[2];
    y2:=ellenor[1];
  end;

for i:=y1 to y2 do
  begin
    if i=pixel.y then
      begin
        writeln("A megadott pixel a gorben belul van!");
        break;
      end;
  end;


Ennyi. Remelem, hogy ertheto!


Udv: TOscar