Ergebnis aus 2 Arrays ?

Alle Fragen um die Programmierung, die sich sonst nicht kategorisieren lassen. Von Makro bis Codeblock, von IF bis ENDIF

Moderator: Moderatoren

Antworten
Benutzeravatar
AUGE_OHR
Marvin
Marvin
Beiträge: 12903
Registriert: Do, 16. Mär 2006 7:55
Wohnort: Hamburg
Hat sich bedankt: 19 Mal
Danksagung erhalten: 44 Mal

Ergebnis aus 2 Arrays ?

Beitrag von AUGE_OHR »

hi,

ich hab hier zwei Arrays die ich sortiere

Code: Alles auswählen

Pseudo-Code
LOCAL a := {}
LOCAL b := {}
LOCAL i

  FOR i := 1 TO 10
      AADD(a,{RANDOMINT(1,10}),RANDOMINT(1,10),i} )	
  NEXT
  a := ASORT( a,,, {|aX,aY| STR(aX[1])+STR(aX[2]) < ;
                            STR(aY[1])+STR(aY[2]) } )

  FOR i := 1 TO 10
      AADD(b,{RANDOMINT(1,10}),RANDOMINT(1,10),i} )	
  NEXT
  b := ASORT( b,,, {|aX,aY| STR(aX[1])+STR(aX[2]) < ;
                            STR(aY[1])+STR(aY[2]) } )

  nPosi := ASCAN( beide Arrays, {|x| x[3] = gesuchtes "i" } )
nun suche ich nach dem kleinsten "i" ( ohne FOR / NEXT Schleife )

wie mache ich das ?
oder eine andere Idee wie ich (schnell) zum Ziel komme ?
gruss by OHR
Jimmy
Benutzeravatar
Herbert
Der Entwickler von "Deep Thought"
Der Entwickler von "Deep Thought"
Beiträge: 1991
Registriert: Do, 14. Aug 2008 0:22
Wohnort: Gmunden am Traunsee, Österreich
Danksagung erhalten: 3 Mal
Kontaktdaten:

Re: Ergebnis aus 2 Arrays ?

Beitrag von Herbert »

Jimmy, was für Zeitaufwand betreibst du da? Wozu?
Ich verstehe nicht genau, was du suchst.
Müsstest nicht abs(ax[1]-ax[2]) usw. nehmen?
Grüsse Herbert
Immer in Bewegung...
Benutzeravatar
AUGE_OHR
Marvin
Marvin
Beiträge: 12903
Registriert: Do, 16. Mär 2006 7:55
Wohnort: Hamburg
Hat sich bedankt: 19 Mal
Danksagung erhalten: 44 Mal

Re: Ergebnis aus 2 Arrays ?

Beitrag von AUGE_OHR »

Herbert hat geschrieben:Ich verstehe nicht genau, was du suchst.
das 3rd Element "i" ist ein "Index".
aX / aY sind Punkte die eine Entfernung ergeben welche nach den kürzesten sortiert sind.

ich möchte von den Arrays "a" & "b" das kleines Element ermitteln wo "i" die selbe Position (Nummer) hat.
wie schon gesagt geht es in einer FOR / NEXT ... und wie geht es "eleganter" ?
gruss by OHR
Jimmy
Antworten