Helyben szétválogatás


A program X számsort válogatja szét páros és páratlan számokra.
A páros számok a sor elejére, a páratlanok a végére kerülnek.

X:

T:

páros

E:

U:

segéd:

Db:

E:=1; U:=N; segéd:=X[E]

Ciklus amíg E<U
	Ciklus amíg E<U és nem T(X[U])
		U:=U-1
	Ciklus vége
	Ha E<U akkor 
		X[E]:=X[U]; E:=E+1
		Ciklus amíg E<U és T(X[E])
			E:=E+1
		Ciklus vége
		Ha E<U akkor X[U]:=X[E]; U:=U-1
	Elágazás vége
Ciklus vége
X[E]:=segéd
Ha T(X[E]) akkor Db:=E különben Db:=E-1

AZ INNOVÁCIÓS ÉS TECHNOLÓGIAI MINISZTÉRIUM ÚNKP-20-6 KÓDSZÁMÚ ÚJ NEMZETI KIVÁLÓSÁG PROGRAMJÁNAK A NEMZETI KUTATÁSI, FEJLESZTÉSI ÉS INNOVÁCIÓS ALAPBÓL FINANSZÍROZOTT SZAKMAI TÁMOGATÁSÁVAL KÉSZÜLT.