... i,n,kinteger function pozli,lsintegerinteger var i,j,modi,modj,minteger manreal begin ili jls modi0 modj-1 hile ij do begin if viisvijs then begin manviis viisvijs vijsman mmodi modi-modj modj-m end iimodi jjmodj end pozi end procedure quickli,lsinteger begin if lils then begin kpozli,ls quickli,k-1 quickk1,ls end end begin ritecate elemente are vectorul readlnn for i1 to n do begin ritetastati elementul ,i, readlnviis end quick1,n ritelnvectorul ordonat este for i1 to n do ritelnviis readln end. OBSERVATIE daca elementul se afla in stanga ,atunci se compara cu elementele din dreapta lui si se sar jj-1elementele mai mari decat el daca elementul se afla in dreapta ,atunci se compara cu elemente din stanga lui si se sar ii1elementele mai mici decat el. bklAKLàFTgiBàààààààààààààààBCJaJmHphsHCJaJja4CJaJC
JaJja4CJaJmHsHCJaJmHsHCJ4aJmHsHBCJ4aJmHphsHbADEFgaC
bsahhJiàRzBihhiiq3Zt!hh 1h à!ia8i8NormalCJsHaJmHsHtHAiDefault Paragraph FontbAaaaaDEFgaCbsaJiàRzBiiq3Zt!i09i09i09i09i09i0
9i09i09i09i09i09i09i09i09i09i09i09i09i09i09i09i09i0
9i09i09i09i09i09i09i09i09i09i09i09i09i09i09i09i09i0
9i09i09i09i09i09i09i09i09i09i09i09i09i09i09i09i09i0
9i09i09i09i09i09i09i09i09i09i09i09i09i09i09i09i090i
aalsLaaaaàCTivzXamr79232GHux-yVYkpLRor...
Download